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AIM 65 File Operations^ 
PET Symbolic Disassembler 
Atari Real Time 
A Better Apple Searcti/Chiange 



Fun With OSI 



SYM Bridge Trainer 



Mountain Computer makes 

more peripherals for 

the Apple Computer 

than Anybody. 

and ... a place to put them 



;al-timG schedules and 
energy conservation Complete applications 
software package Home security with random 
scheduler Power usage accounting package for 
tiome energy cost con'rol No wiring required. 



ackground operation of 
„ jM,,„,,aneously. Battery back-up 
jlled for • 001% accuracy Onboa 



:XPANSION 







! for powerful system 
COPYROIVI -Others 



sly available only on 
i mainframe com- 
puter synthesizers Digital instrumental 
music synthesi/er system 16 voices in 
stereo Instrument definitions simulate the 
sound of real mstruments— and more. Fully 
programmable waveforms. Envelope Con- 
trol. Composition system-sheet music 
input using standard music notation. 
Chords and multi-part scoring up to 16 
voices. A true instrument that anyone with 



Vo*i^ 



an Apple can play 



16 channels ar 
channels digi 
Eight bit resc 
sec conversic 
output to the 
card. 



to analog output 
!ion. Super-fast 9*. 



requiring off-line data preparation for batch 
entry later. Connects to any computer having 
RS-232 interface. Software and cards are 
available for jobs in business, science and 
education. 

fvlOUNTAIN COIVIPUTER has the most compre- 
hensive line of Apple. peripherals available. 
Anywere. From anybody. We know the Apple 
inside and out and are committed to providing 
the most innovative and unique products to 
expand and enhance its capabilities and use 
After all, we were the first company to make an 
Apple peripheral— except Apple Computer 

Available at Apple Dealers worldwide 

' J -■ "-iJ '^ ■■•J IJ V >j 0. '.). ' '' '■} '•)' 

300 Harvey West Blvd., Santa Cruz, C A 95060 
(408) 423-8600 TWX 910 598-4504 



Apple IS a trademark of Appie Co 



SOFTWARE FOR OSI 
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A JOURNAL FOR OSI USERS!! 

The Aardvark Journal is a bimonthly tutorial for OSI 
users. It features programs customized for OSI and 
has run articles like these: 

1 ) Using String Variables. 

2) High Speed Basic On An OSI. 

3) Hooking a Cheap Printer To An OSI. 

4) An OSI Disk Primer. 

5) A Word Processor For Disk Or Tape Machines. 

6) Moving The Disk Directory Off Track 12. 



Four back issues already available 
$9.00 per year (6 issues) 




ADVENTURES 

Adventures are interactive fantasies where you give the 

computer plain English commands (i.e. take the sword, 

look at the control panel.) as you explore alien cities, 

space ships, ancient pyramids and sunken subs. Average 

playing time is 30 to 40 hours in several sessions. 

There is literally nothing else like them - except 

being there yourself. We have six adventures available. 

ESCAPE FROM MARS - Explore an ancient 

Martian city while you prepare for your escape. 

NUCLEAR SUBMARINE - Fast moving 

excitement at the bottom of the sea. 

PYRAMID — Our most advanced and most 

challenging adventure. Takes place in our 

own special ancient pyramid. 

VAMPIRE CASTLE - A day in old Drac's 

castle. But it's getting dark outside. 

DEATH SHIP - It's a cruise ship - but it ain't 

the Love Boat and survival is far from certain. 

TREK ADVENTURE - Takes place on a 

familiar starship. Almost as 

good as being there. 

$14.95 each 



NEW SUPPORT ROMS FOR BASIC 
IN ROM MACHINES 



CIS - for the C1P only, this ROM adds full 
screen edit functions (insert, delete, change 
characters in a basic line.). Software selectable 
scroll windows, two instant screen clears (scroll 
window only and full screen.), software choice of 
OSI or standard keyboard format. Bell support, 
600 Baud cassette support, and a few other 
features. It plugs in in place of the OSI ROM. 
NOTE: this ROM also supports video conversions 
for 24, 32, 48, or 64 characters per line. All that 
and it sells for a rnesly $39.95. 
C1E/C2E for CI/C2/C4/C8 Basic in ROM ma- 
chines. 

This ROM adds full screen editing, software 
selectable scroll windows, keyboard correction 
(software selectable), and contains both an 
extended machine code rrionitor and a fix for 
the string handling bug in OSI Basicll It has 
breakpoint utilities, machine code load and save, 
block memory move and hex dump utilities. A 
must for the ma:hine code programmer replaces 
OSI support ROM. Specify systemi $59.95 
STRING BUG FIX (replaces basic ROM chip 
number 3) 

All this chip dc«s is to replace the third basic 
ROM and correct the errors that were put into 
the ROM mask, $19.95 

DATA SHEETS 

OS65D LISTING 

Commented with source code, S3 pages. $24.95 
THE (REAL) FIRST BOOK OF OSI 

65 packed pages on how OSI basic works. Our 

best selling data sheet. $15.95 

OSI BASIC IN ROM 

Ed Carlson's book of how to program in basic. 

Now available from Aardvark. $8.95 



MEMORY BOARDSIt - for the C1P. - and they 
contain parallel portsl 

Aardvarks new memory board supports 8K 
of 21 14's and has provision for a PIA to give a 
parallel portsl It sells as a bare board for $29.95. 
When assembled, the board plugs into the expan- 
sion connector on the 6(X) board. Available nowl 

REAL SOUND FOR THE C1P - and it'scheapl 
This bare board uses the Tl sound chip to give 
real arcade type sound. The board goes together 
in a couple of hours with about $20.00 in parts. 
Bare board, plans, and sample program — $15.95 

ARCADE AND VIDEO GAMES 

ALIEN INVADERS with machine code moves — 
for fast action. This is our (jest invaders yet. The 
disk version is so fast that we had to add select- 
able speeds to make it playable. 
Tape - $10.95 - Disk - $12i)5 

TIME TREK (8K) - real time Startrek action. 
See your ton^edoes move across the screeni Real 
graphics — no more scrolling displays. $9.95 

STARFIGHTER — a real time space war where 
you face cruisers, battleships and fighters using a 
variety of weapons. Your screen contains work- 
ing instrumentation and a real time display of the 
alien ships. $6.95 in black and white - $7.95 in 
color and sound. 

SEAWOLFE — this one Iooks like it just stepped 
out of the arcades. It features multiple torpedoes, 
several target ships, floating mines and real time 
time-to-go and score displa^/s. - $6.95 in black 
and white $7 .95 in color and sound. 



SCREEN EDITORS 



These programs all allow the editing of basic 
lines. All assume that you are using the standard 
OSI video display and polled keyboard. 
C1P CURSOR CONTROL - A program that uses 
no RAM normally available to the system. (We 
hid it in unused space on page 2). It provides 
real backspace, insert, delete and replace func- 
tions and an optional instant screen clear. 
$11 .95 

C2/4 CURSOR. This one uses 366 BYTES of 
RAM to provide a full screen editor. Edit and 
change lines on any part of the screen. (Basic in 
ROM systems only.) 

FOR DISK SYSTEMS - (650, polled key- 
board and standard video only.) 
SUPEROISK. Contains a basic text editor with 
functions similar to the above programs and also 
contains a renumberer, variable table maker, 
search and new BEX EC* programs. The BEX EC* 
provides a directory, create, delete, and change 
utilities on one track and is worth having by 
itself. - $24.95 on 5" disk - $26.95 on 8" . 

DISK UTILITIES 

SUPER COPY - Single Disk Copier 

This copy program makes multiple copies, 

copies track zero, and copies all the tracks 

that your memory can hold at one time — 

up to 12 tracks at a pass. It's almost as fast 

as dual disk copying. — $15.95 

OISKCATALOGER 

This utility reads the directory of your disks 

and makes up an alphabetic list off all your 

programs and what disks they are on. $14.95 

MACHINE CODE RENUMBERER 

(C2/4-MFonly) 

Renumbers all or part of a program at machine 

code speeds. — $15.95 



^\ 



This is only a partial listing of what we have to offer. Ws now offer over 100 programi, data sheets, ROMS, and boards 
for OSI systems. Our $1.00 catalog lists it all and contains free program listings and programming hints toiboot. 

Aardvark Technical Services • 1690 Bolton • Walled Lake, Ml 48088 

(313)669-3110 or (313)624-6316 
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DATA CAPTURE 4.0 

The most advanced and easiest to use telecommunications program for use 
with the MICROMODEM II® or the Apple COMMUNICATIONS CARD®. 



O 



0. 



Q. 

A. 

Q. 

A. 



Will DATA CAPTURE 4.0 work with my Communica- 
tions Cards and a modem? 

It makes using the Comm. Card almost as easy as using 
theMicromodemll, 

Oo I need an extra editor to prepare text for transmis- 
sion to another computer? 

No. DATA CAPTURE 4.0 gives you control of the text 
buffer. You can use DATA CAPTURE 4.0 to create text. 

Can I edit the text I have prepared? 

Yes. You can insert lines or delete any lines from the text. 

How about text I have captured. Can i edit that? 

As easily as the text you have prepared yourself. You can 
delete any lines you don't want to print or save to a disk file. 
You can also insert lines into the text. 

Q. Just how much text can I capture with DATA 
CAPTURE 4.0? 

A. If the system with which you are communicating accepts a 
stop character, most use a Control S, you can capture an 
unlimited amount of text. 

Q. How does that woric? And do I have to keep an eye on 
how much I have already captured? 

A. When the text buffer is full the stop character is output to 
the other system. Then DATA CAPTURE 4.0 writes what 
has been captured up to fliat point to a disk file. This Is 
done automatk:aliy. 

Q. Then what happens? 

A. Control is returned to you and you can send the start 
char£u;ter to the other system. This generally requires 
pressirtg any key, the RETURN key or a Control Q. 

Q. Are upper and tower case supported if I have a Lower 
Case Adapter? 

A. Yes. If you don't have ttie adapter an upper case only 
versbn is also provicted on the diskette. 

Q. Do I need to have my printer card or Microfflodemil^^ 
or Communications Card® in any special slot? 

A. No. All this is taken care of when you first run a short 
program to configure DATA CAPTURE 4.0 to your system. 
Then you dort'f hiave to be concerned with it again. If you 
move your cards around later you can reconfigure DATA 
CAPTURE 4.0. 

Q. Do I have to bulid a flie on Hie other system to get it 
sent to my Apple? 

A. No. If the other system can list it you can capture it. 

Q. How Msy Is it to transmit text or data to another 
system? 

A. You can loal the text or data into DATA CAPTURE 4.0 
from the disk and transmit it. Or you can transmit what you 
have typed into DATA CAPTURE 4.0. 

Q. How can I be swe ttw aOmr system receives wtiat I 
swidit? 

A. If the other system works in Full Duplex, it 'echoes* what 
you said it, then DATA CAPTURE 4.0 adjusts its sending 
speed to the crther system and won't sendthe next charac- 
ter untii it is sure liie present one has been received. We 
call that 'Dynamic Senefing Speed Ac|ustm«it'. 

Q. Wliat if the other system works only in Half Duplex. 

A. A afferent sendir»g routine is provkled for use wslh Half 
Duplex systems. 

Q. What if i want to transmit a program to the other 
system? 

A. No problem. You nwke the program into a text ffle with a 
program that is provided with DATA CAPTURE 4.0, toad it 
into DATA CAPTURE 4.0 and transmit it. 



Q. What type files can I read and save with DATA 
CAPTURE 4.0? 

A. Any Apple DOS sequential text file. You can create and 
edit EXEC files, send or receive VISCIALC© data files, 
send or receive text files created with any editor that uses 
text files. 

Q. Can I leave DATA CAPTURE 4.0 running on my Apple 
at home and use it from another system ? 

A. Yes. If you are using the Micromodem II® you can call 
DATA CAPTURE 4.0 from another system. This is handy if 
you are at work and want to transmit something to your 
unattended Apple at home. 

Q. Where can i buy DATA CAPTURE 4.0? 

A. Your local Apple dealer. If he doesn't have it ask him to 
order it. Or if you can't wait order it directly from Southeast- 
ern Software. The price is $65.00. To order the Dan 
Paymar Lx)wer Case Adapter add $64.95 and include the 
serial number of your Apple. 

Q. If I order It directly how can i pay for it? 

A. We accept Master Charge, Visa or your personal check. 
You will get your order shipped within 3 working days of 
when we receive it no matter how you pay for it. Send your 
order to us at the address shown or call either of the 
numbers in this advertisement. You can call anytime of 
day, evening or Saturdays. 

Q. I bought DATA CAPTURE 3.0 and DATA CAPTURE 4.0 
sounds so good I want this version. What do I do to 
upgrade? 

A. Send us your original DATA CAPTURE 3.0 diskette and 
documentatk)n, the $35.00 price difference and ^.50 for 
postage and handling. We will send you DATA CAPTURE 
4.0 within 3 working days of receiving your order. 

Q. What kind of support cwi I expect after I buy H? 

A. If you have bought from Southeastern Software in the past 
you know we are always ready to answer any questions 
about our products or how to use them. 

Requires DISK II®, Applesoft II® and 48K of Memory 

DATA CAPTURE 4.0® 

Copyright® 1980-Southeastern Software 

' Appt»», Apple II Ptu9», DIak ll« and APPLESOmt» are tradwnarks oi Appis 
ComputsrCompany. 

* MicRxnodefn if tea trademark ol D.C. Hayes Asaociales, Inc. 

' VisJcalc©.CopyrigM by Software Aits. Inc. 
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We welcome your person^J 
check. We also accept Visa and Master Charge. 

Soutkastcm Software 



Dept. MK 

6414 Derbyshire Drive • New Orleans, LA 701 26 

504/246-8438 504/246-7937 
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Apple PIE 



+ 



Formatter 



Apple PIE (Programma International Editor) 
and FORMAT (text formatter) offer full strength 
solutions to today's word processing problems. 
These versatile, powerful programs provide 
document preparation and word processing 
capabilities previously found only on much larger 
computer systems. 

PIE is a general purpose, full screen editor 
that uses control keys and function buttons to 
provide a full range of editing capabiHties such as 
search and replace, delete, copy, insert, move. 
Changes may be made direcdy anywhere on the 
screen and are shown as they are performed. 

FORMAT uses simple instructions 
embedded in the input text to describe the desired 
appearance of the final document. It handles 
centering, underlining, indenting, page numbering. 



margins, headers, footers, even form letters, and 
includes a proofing capability. 

These high-c[uality, cost-effective programs 
come with comprehensive documentation and run 
on a 32K Apple II. They are available through . ,„ 
your local computer store or direct from % 

Programma International, Inc. at the H 

introductory price of $79.95*. 

VIDEX VERSION T.M. 

DOUBLE VISION T.M. 

SUPR TERM VERSION T.M. 

STANDARD VERSION ^^^ 

*Decemberl, J 129.95. 

PROGRAMMA 

3400 Wilshire Boulevard 

Los Angeles, California 90010 

(213) 384-0579 



Simple enough for the beginner. Versatile enough for the professional. 
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Editorial 



MICRO Goes To School 

Almost eveiy progressive school now 
uses computers to teach about com- 
puters, to teach other subjects, and for 
administrative and other non-teaching 
tasks. Since a school may already own a 
mini- or ma>:i-computer, or have access 
to one within the town or school 
district, the assumption is often made 
that it will be cheaper to buy additional 
devices to tie into an existing system 
than to purchase new systems. This 
assumption may be erroneous since 
many of the operations can be more 
effectively performed by a dedicated 
microcomputer than by a large time- 
shared central computer. 

A local high school rents 10 teletype 
terminals at over $500 each, per year, 
to access a medium-sized system at the 
regional vocational high school. One or 
two of the terminals are used for 
administrative tasks, which may re- 
quire a lairge disk storage and/or 
voluminous print-outs that could be 
best handled by the central system. 
The remaining terminals are for 
students learning computer program- 
ming, especially programming in 
BASIC . Under this remote terminal ap- 
proach, students can only use the 
teletype with its obvious limitations of 
speed and minimal characters, can only 
access the central computer at certain 
times, do not get the "hands-on" ex- 
perience of actually operating a 
microcomputer, do not get the graphics 



and instant video response of the 
micro, and probably do not have the 
range of programs available — games 
and others — that they would get on a 
micro. Meanwhile, the school system 
is paying as much tci rent one terminal 
for two years as it would cost to buy a 
complete 6502-based video system. 
This does not even include the hidden 
expenses of the telephone, support for 
the central system, special main-frame 
programming, and so forth. 

This is absurd, but understandable. 
The large computer manufacturers 
have spent time, money and effort to 
convince the educational community 
of the value of a central time-sharing 
system. No microcomputer company 
has had the resources or tiitne to tackle 
this monumental task alone. Advances 
to date have been mostly due to 
individual computer stores, "enlight- 
end" teachers, and the occasional out- 
side individual, getting the school 
systems to think along micro lines. 



What better way to learn about a 
computer than to have the entire 
system at your disposal — no 
mysterious big black boxes in special 
air conditioned rooms located off- 
limits in another part of the building, 
or even across town. Probably more 
programs have been <;reated for learning 
about computers using popular 
6502-based microcomputers than were 
ever devised for any mainframe. 

Beyond the teaching aspect of the 
micro in the school, there are 
numerous possibilities in school ad- 
ministration. Students could even 
write some of the programs. (Note: 
teachers had better carefully check the 
programs for accuracy. Some of the 
computer students are pretty sharp and 
might just "adjust" their ^;rades!j 



MICRO would like to try, with the 
aid of its readers, to help expand 
microcomputer usage in schools. There 
are several simple steps which you can 
take to help. First, become aware of 
what your local school system is doing 
in the computer field. Is it keeping up 
with the microcomputer revolution? If 
so, please let us know — in detail — how 
your school system is doing it. Perhaps 
the people responsible for the com- 
puters would be willing to write up 
some of their experiences, decisions, 
and so forth, providing assistance to 
other schools which are out-of-date. 

If your school system is not keeping 
up, then offer to help. Find out who in 
your school system has the respon- 
sibility for the computer field and 
invite him or her over to see your 
equipment in operation. Show off some 
of your system's features and 
emphasize its low cost, its capabilities 
in the teaching area, and the fact that 
there is a lot of support through books 
and magazines such as MICRO. 
Explain that there are lots of programs 
available, which are generally inexpen- 
sive, covering many areas [show them 
the MICRO Software Catalog). Offer to 
help the school system evaluate its 
needs and requirements. You would be 
surprised at how small a push it may 
take to get things going. If there is 
enough reader interest, we would like 
to actively pursue this topic. This 
could include columns on educational 
applications of the 6502-based systems, 
special software listings of educational- 
ly related programs, discussions of 
school system needs, and so forth. 
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MICRO Goes To Town 

Our cover photograph, by Loren Wright, is 
of Littleton, New Hampshire. As we look at 
towns like this, the question arises, "How 
can a town or city effectively utilize 
microcomputers?" While some data collec- 
tion and processing requirements of a 
government probably require the use of 
medium to large computer systems, other 
functions could be more efficiently and 
economically handled by a dedicated 
microcomputer. 

Our cover shows a roicro being used as a 
processor for voter registration. This simple 
application could include printing labels for 
the mailing of voter information, updating 
lists as voters are added, dropped, or change 



their addresses, recording changes in party 
affiliation, and so forth. Confidential 
material would not have to go outside the 
office; updating could be kept more current, 
and specialized lists easily prepared as re- 
quired for a special election or other need; 
since this task would take only a small por- 
tion of the normal business week, the micro 
would be available to other departments and 
for other uses. 

Other small data bases typically kept by 
local governments covering property 
assessments, zoning regulations, building 
permits, dog registrations, licenses, etc 
could often be done on a microcomputer. Is 
your town or city keeping pace with the 
growing microcomputer capabilities? 
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Letterbox 



Dear Editor: 

Ohio Scientific CIP has a fine 
BASIC, but I envy the TRS-80 crowd 
and their PWNT USING. Since some 
programs must calculate and print 
dollar amounts, this simple routine 
puts the result of the calculation off to 
the right side of the screen, adds any re- 
quired zeros and lines up the decimal 
points. 

The only thing it does not do is 
round off amounts, and that would 
require only adding a line, 
DO = DO + .005 before transferring 
control to the subroutine. 

Note that line 100 should be early 
in the program so the computer does 
not run across it each time the 
subroutine is called. 

Zero amounts are printed correctly, 
but any dollar amount with more than 
six significant figures will cause the in- 



terpreter to go to scientific notation, 
which may give gross enors. Since I 
never have to worry about large 
amounts of money, that problem does 
not bother me. 

100 Z$ = "00" 

200 REM PROGRAM 

CALCULATES DOLLAR 

VALUE-DO 
210 REM SUBROUTINE 

PRINTS 
220 GOSUB10000 
230 REM REST OF 

PROGF^AM 



10000 DO$ = STR$(DO):IFDO 

= INT{DO)THEN DOS 

= DO$-l-"." 
10010 F0RP=IT0LEN(DO $): 

IFMID$(D0$,P,1) 

= "."THEN10030 
10020 NEXTP 
10030 0$ = DO$-l-Z$:0$ 

= ■'$■' -I- LEFT$(0$, 

P + 2) 
10040 PRINTTAB(20 - LEN 

(0$))0$ 
10050 RETURN 

Robert V. Davis 

1857 South Fourth 

Salina, Kansas 67401 



Dear Editor: 

The following program will disable 
the "LIST" command on Ohio Scien- 
tific ROM BASIC computers. Programs 
can be loaded and run, but not listed. 
Normally, I do not like non-listable 
programs and accept the challenge to 
try to list them. Thus, I offer your 
readers the challenge of listing this pro- 
gram after it has been run. If you need a 
hint, read MICRO 25:15. 

10 FORX = 546T0586 

20 READQ:POKEX,Q 

30 NEXTX 

40 POKE11,62:POKE12,2 

50 X = USR(1) 

80 DATA230,195,208,2,230, 
196,165,195,141 

81 DATA51,2,165,196,141,52, 
2,173,20,0,201 

82 DATA153,208,2,169,128, 
76,197,0,169,76 

83 DATA133,188,169,34,133, 
189,169,2,133 

84 DATA1 90,96 
OK 

Tim Finkbeiner 

Earl Morris 

Midland, Michigan 

(continued on page 16} 
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Keyboard 
Encoding 



It may occur sooner, or it may 
occur later, but you iv/7/ want to 
connect a keyboard to your 
computer. 



George Young 
Sierra High SJchool 
Tolltiouse, CA 93667 



I will begin with a fairly simple encoder 
for 16 separate switches. Figure 1 gives 
the circuit. The 16 switches may be 
discrete switches or they may be 16 
switches in a surplus or recycled 
i^ calculator keypad. 

The 16 switches are connected to 
the inputs of a 74150 1:16 multiplexer 
(MUX). Two 74161 's or 74163's are 
used. One 74161 is used as a counter 
and the second is used as a register. A 
clock formed from Vi of a 7404 hex 



inverter is used to drive the 74161 
clock inputs. 

The outputs of the 74161 counter 
drive the MUX and the inputs to the 
74161 register. The binary code 
presented to the MUX address inputs 
causes the MUX to scan each one of its 
inputs looking for a low. Closing one of 
the 16 switches connected to the input 
of the 74150 will cause this input to go 
low. The output of the 74150 will go 
high when a low is detected on one of 
its inputs. This high is time coincident, 
or time dependent, on the counter 
binary code at the instant of switch 
closure. This is the basic property of 
multiplexing. 

The high out of the MUX is inverted 
with a 7404 hex inverter stage to pro- 
duce a low on a key closure. This low is 
fed to the PE (preset enable) of the two 
741 6rs. This low will cause the 
register 74161 to place the covmter code 
that corresponds to the switch closed 
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Figure 1. Encoder for 16 SPST switches. 



on its four output lines . This code will 
remain unchanged at the register out- 
puts until another key is depressed. 
Thus, the code, or data out of the 
encoder is latched by the 74161 register 
stage. 

The output code of the encoder can 
be seen by cormecting 4 LEDs to the 4 
register output lines. Figure 2 shows 
one way to connect the LEDs for this 
purpose. A logic probe may also be used 
to probe each output line to verify the 
code generated by the encoder. 

When keyboards are encoded, a 
strobe pulse is also usually needed for 
the computer. Keyswitches bounce 
when connected to TTL chips, so a key 
debounce circuit is also usually 
required. Figure 3 shows a NAND gate 
section gating the clock and driving a 
74122 retriggerable one-shot. This 
combination will debounce the key 
contacts and generate an active high 
and an active low strobe pulse. 
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Figure 2. LED monitor for checking 
output of encoder. 
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To encode more than 16 keys, 
another 74150 would be needed with 
another 16 lines to the switch 
assembly. Additional 7416rs used as 
counters and registers would be 
required to encode the added key- 
switches. The major drawback to using 
this approach would be the size of the 
cable [minimum number of wires to 
the keyboard is 33; 32 for the key- 
switches and one ground.) To circum- 
vent this wire bundle, a different type 
of encoding is required. 

Matrix Encoding 

Only 8 wires need run from the 
switch assembly to the encoder 
circuitry to encode 16 switches, if the 
switches are arranged in a 4 x 4 
matrix. The code is generated by a 
keyswitch matrix by using a 1:4 
decoder to drive one set of 4 lines, 
which we will call the column lines, 
and feeding the other 4 lines to the in- 
puts of a MUX. We will call these 4 
lines the row lines. 

The 74161 counter and register 
stages are again used in this circuit and 
they are again driven by the 7404 clock. 
Two of the counter outputs drive the 
two address lines of the decoder while 
the remaining two outputs drive the 
address inputs of the MUX. A 1:4 
decoder (74139) or a 1:10 decoder can 
be used, and if the unused address lines 
are grounded, the decoder will function 
as a 1:4 decoder. A T.8 MUX is used, 
operating as a 1:4 MUX again by 
grounding the unused address lines. 

The counter code driving the 
address lines causes the decoder to put 
out sequential and mutually exclusive 
lows on its output pins. These lows 
feed the column lines of the switch 
matrix. The row lines feed the input 
pins of the MUX, and the remaining 
two 74161 counter outputs drive the 
address inputs of the MUX. Again, the 
MUX will look at each of its inputs to 
see if one of them is low. Closing a 
switch in the matrix causes the active 
low output of the MUX to go low, and 
the active high output to go high. This 
active high or low out of the MUX is 
again time coincident with the binary 
code, operating both decoder and MUX 
so the 74161 register outputs will again 
latch this code and you can examine it 
with LEDs on the 74161 register output 
lines, or with a logic probe. 

Debouncing of the keyswitches and 
generation of strobes is again done with 
a NAND gate section and a 74122 
retriggerable one-shot. All of this 
circuitry is shown in figure 4. 
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Figure 3. Key contact debounce/strobe generator. 
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Figure 4. Basic matrix encoder for 16 switches. 
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Figure 7. 128 key matrix encoder. 
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Figure 8. 256 key matrix encoder (remainder of circuit Identical to figure 7). 
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Expansion 

To encode 32 keys in a matrix 
requires only 4 additional lines from 
the keyswitches to the encoder 
circuitry. Aji additional 74161 counter 
stage, and an additional 74161 register 
stage must be added to the basic circuit 
of figure 4. I will first place the matrix 
in a 4 x 8 configuration. This circuit is 
shown in figure 5. The top keyswitch 
matrix will generate the hexadecimal 
code from 00 to OF. The lower 
keyswitch matrix will generate hex 
codes from 10 to IF. The keyswitches 
can also be arranged in an 8 x 4 matrix 
to encode the keyswitches. This circuit 
is shown in figure 6. Figure 6 also 
reveals that the encoding capability of 
the 4-74161's and 1:8 decoder and 1:8 
MUX is only partially used. Sixty-four 
switches in an 8 x 8 matrix requiring 
16 wires from switches to encoder 
circuitry can be encoded by the 
circuitry of figuire 6. 

The basic circuit is very flexible. 
Let us next encode a keyboard that has 
over 100 keys. We must change the 
decoder to a 74154 1:16 decoder, and 
place the keyswitches in a 16 x 8 
matrix. In the configuration of figure 7, 
128 switches can be encoded with the 
basic circuitry used earlier. The ASCII 
character set has been placed in posi- 
tion in the matrix to illustrate how the 
circuitry can be used to encode an 
ASCII keyboard. The builder will find, 
however, that he must make special 
provisions for the ASCII keyboard Shift 
and Control keys. 

The circuit of figure 7 will encode 
up to 128 keys placed in a 16 x 4,5,6, 7 
or 8 matrix and therefore can be used to 
encode almost .any surplus keyboard. If 
the key in the matrix generates a 
different code than desired, it is a fairly 
simple matter to use the power of the 
computer itself to convert the code to 
ASCII, EBCDIC, Baudot (Murray), or 
whatever other code the builder may 
desire. 

Thirty-three lines were used earlier 
to encode 32 discrete keyswitches. If 
the decoder is a 75154 and the MUX is 
a 74150, the 32 lines from the 
keyswitch matrix to the encoder will 
encode 256 switches (if you can find 
that many to e:Qcode.' ) . The matrix is a 
16 X 16, and the encoder capability is 
twice as much as the full ASCII 
character set. Extra keypads, cursor- 
controls, computer controls, and so on, 
can be encoded and the hexadecimal 
codes generated run from GO to FF. 
figure 8 shows this circuit. 



Computer Encoding 

Keyboards may be encoded with a 
computer as well as with a hardware 
encoder. In this case we usually find 
ourselves restricted to 64 keys of 
encoding. This is caused by the 8-bit 
operation of our machines. We can use 
a PIA (Peripheral Interface Adapter) 
chip and tell 8 of the port lines they are 
outputs, and 8 more that they are 
inputs. With software, we then essen- 
tially duplicate the decoder function 
and drive each of the output lines low 
one-at-a-time. These correspond to the 
column lines of the hardware encoder. 
The keyswitches are placed in an 8 x 8 
matrix so that the input lines (row 
lines) feed the input port. The 
keyswitch code generated in this 
fashion does not resemble hexadecimal 
in any sequence that you can dream up, 
but each key in the matrix will 
generate a discrete code. These discrete 
codes are then converted by software to 
the desired code. Figuire 9 gives the 
basic circuit. 



A full ASCn keyboard does not have 
128 keys. The keys are made to do 
"double duty" with the Shift key. The 
Shift key on an 8 x 8 computer en- 
coded matrix can be used to set one bit 
high and essentially double the number 
of codes generated. Special circuitry 
and software must be employed to 
handle the ASCII keyboard Control 
key. Thus, although the basic software 
encoder seems only capable of encoding 
either upper or lower case characters, it 
can, with some special circuitry encode 
almost all of the full 128 characters of 
the ASCn character set. We will have 
to give up a few of the ASCII codes, 
since two of the keys (Shift and 
Control) will need to perform special 
functions. 

The basic problem of the computer 
encoded keyboard is that keyboards do 
not easily fit into a square matrix. 
Keyboards are rectangular and are 
usually 16 keys (or less) wide by 5 or 6 
rows high. Consequently, Lf the foil 
traces must be cut to get the key- 
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F/'gure 9. Basic circuit for matrix encoding using PiA chip. 
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switches into a matrix, the hardware 
16 X 5 or 6 encoder will usually prove 
simpler to rewire than figuring out how 
to square things up and get the keys 
into an 8 X 8 matrix. 



The Input Port 

Once the keyboard has been 
encoded in hardware the builder must 
find a way to get its codes into the 
machine. One very definite advantage 
of the software encoded keyboard using 
a PIA chip is that this detail need not 
concern the builder. 



the job, this article has, in reality, 
barely "scratched the surface" of 
encoding keys witches. 



George Young has been into computer 
electronics and programming for only 
three years, He has designed and bulk his 
own 6502-based homebrew computer in 
nine Phases, and this HB includes 
everything but floppies. Articles for 
publication are prepared on the text 
editing portion of this 6502 homebrew, 
and printing is via an interfaced Selectric 
I/O Writer, 



The author's main interest is education 
He will teach anything to anybody who 
will take the time to listen to him or ask 
the questions and listen to the answers. 
He enjoys writing since it is an extension 
of his teaching (and enables him to have a 
larger number of students in his 
'classroom' I. 



JMCftO 







To get into the machine, additional 
hardware is required. If a serial port is 
desired, this is usually handled with a 
UART. A parallel port is very easy to 
construct, and usually much less 
expensive to get into operation than the 
UART. (Figure 10 gives the circuitry.) 
The port is placed wherever the builder 
desires, with a decoder. The circuit of 
figure 10 will place the port at 7FF7, or 
about half-way through the address 
range. The keyboard code, which must 
be latched, is transferred to the 
accumulator with a LDA, Absolute 
Mode at address 7FF7. If the software is 
interrupt-driven, the IRQ latch may 
also be reset with this command. If the 
software is NMI-driven, then resetting 
of the IRQ latch is unnecessary. A STA, 
page zero or STA, Absolute will then 
place the keyboard code in memory and 
a Return From Interrupt can follow. 
The code can then be processed with a 
subroutine to convert it to whatever 
code you desire. 

A bonus of the circuit of figure 10 is 
that not only one port is provided for, 
but 8 active lows are available from 
7FFO-7FF7. This means that you can 
have 8 input or output ports at these 
locations. Or the signals generated by 
either reading or writing these memory 
locations can be used for handshakes or 
software generated turn-on or turn-off 
signals to the outside world. By placing 
a 1:16 decoder (74154) here instead of a 
1:8 or 1:10 decoder, 16 ports, hand- 
shakes, etc. can be obtained. 

Summary 

The one basic circuit is quite flex- 
ible. It can be used to hardware encode 
almost any keyboard. Placing the 
keyboard in a matrix reduces the 
number or interconnecting wires 
needed between keyswitches and 
encoder circuitry. Since only one 
fundamental circuit was given here, 
and there are many, many ways to do 
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Figure 10. Keyboard encoder input port 
with iRQ service request latch. 
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16KRAM 

Expansion Board 
for the Apple II* 

$195.00 

• expands your 48K Apple to 
64K of prosrammable 
memory 

• works with Microsoft Z-80 
card, Visicalc, LISA ver 2.0 
and other software 

• eliminates the need for an 
Applesoft* or Integer Basic 
ROM Card 

• switch selection of RAM or 
mother board ROM 
language 

• includes installation and use 
manual 

• fully assembled and tested 



9d 



vrsA 



Visa and MasterCard accepted 

Shippins and handlins will be added unless the order 

is accompanied by a check or nnoney order 

N.C. residents add 4% sales tax 



♦Apple II and Applesoft are trademarks of Apple 
Computer, Inc. 



ANDROMEDA 



n 



INCORPORATED" 

P.O. Box 19144 
Greensboro, NC 27410 
(919)852-1482 



"Formerly Andromeda Computer Systems 
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Computet Camp 

This summer, youngsters can again sign up for an over- 
night camp in Moodus, Connecticut, where the main 
activity will be COMPUTERS. This unique recrea- 
tional and educational"experience is directed by Dr. 
Michael Zabinski, Professor at Fairfield University. It is 
the original summer, overnight, computer camp cur- 
rently offered in the USA. 

The 1981 National Computer Camp will feature 
two action-packed one-week sessions: first session July 
19-24; 2nd session July 26-31. The campers, ages 10-17, 
will enjoy small group instruction and mini and 
microcomputers for ample "hands-on" experience. Dr. 
Zabinski will be assisted by elementary and secondary 
school teachers. 

The camp is for kids of all levels of experience, in- 
cluding no experience whatsoever. In addition to com- 
puters, the campers will enjoy the recreational facilities 
of the Grand View Lodge, which include swimming and 
volley ball. 

For further information, contact Micahel Zabinski, 
Ph.D., at (203) 795-9069, or write to: 

Computer Camp 

Grand View Lodge, Box 22 

Moodus, Connecticut 06469. 



Apple Monitor Extender 




APPLE II 16K, CASSETTE 

This utility program works in complete harmony with the Apple 
monitor to extend your computer's capability and help you use 
the full power of machine language programming. 

Screen display shows memory in HEX, ASCII or BINARY. Move 
data anywhere in memory without regard to direction or overlap- 
ping and read or write any sector on disl(. Insertions may be in 
HEX or ASCII so you can easily format high speed text displays 
without conversions. 

Study, modify or disassemble any program, complete with 
labels. Several programs may be combined, and the entire 
disassembled text file stored on disk/tape for later assembly. 

The slow listing feature steps through listings with ease. 
Copyright 1980 Glenn R. Sogge, All Rights Reserved. 

COMPUTER L!,*"„TV°6™62 

KKUDUC IS> 312/564-5060 
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APPLE II 

32K, DISK 



13 OR 16 SECTOR 



If you care enough to back up critical programs and files, Disk 
Fixer^'^will give additional peace of mind. This powerful utility 
for experienced Apple users is a tool kit for manipulating, repair- 
ing, and protecting all data on disk. 

Use the high-speed full screen editor to examine and easily 
change any portion of a disk, correct space usage within files, 
and save money by locking out bad tracks on disks. Directories 
are alphabetized, if you choose. 

The display and search capabilities show where specific HEX 
or ASCII data is located and you can modify any data including 
binary files. DOS 3.2, DOS 3.3 & language system disk 

Written by Jeffrey P. Garbers 
1980 The Image Producers, inc.. All Rights Reserved 

615 Academy Drive 
Northbrook, IL 60062 
312/564 5060 



MUSICAL COMPUTER I AND il 
Learn How to Read Music! 

Written by an M.A. educator with over 20 years of 
music experience. This two program cassette 
provides an alternative to music education. 



Treble & Bass Note Reading 
Telling Time 
Notes and Rests 
Sharps and Flats 
Signs and Symbols 
Tempo Definitions 



$34.95 plus $1.00 for postage and handling 

Check or Money Order Please 

(Mi. residents add 4% sales tax) 

Check: D Apple 11 32K QTRS-SO Level II 16 K 

Name: 

Address: 

COMPUTER ,^,^^,,3 

APPLICATIONS Birmingharv 

TOMORROW Mi. 48012 



A Better 
Apple 

Search/Change 



This improved version of the 
SEARCH/CHANGE program 
removes the length restriction 
on the CHANGE function. 



J.D. Childress 

5108 Springlake Way 

Baltimore, Maryland 21212 



Lately I've made much use of the 
SEARCH/ CHANGE program pub- 
lished last January in MICRO (20:55) 
and have become quite impatient with 
its shortcomings. I first made some 
minor modifications but then decided 
the real need was to remove the length 
restriction on the CHANGE fimction. 
The complete program, with this 
modification, is given in the program 
listing. The discussion following 
assumes familiarity with the earlier 
paper. 

An urgent warning is issued here. 
This program is like the girl with the 
curl: When it's good, it's very, very 
good but when it's bad, it's horrid. If it 
misfires, your program likely will be 
lost. The wise will always keep a 
current backup copy. 

Minor Modifications 

For those not wanting to do much 
retyping or needing only the range 
control feature (references here are to 
the line numbers in the 
SEARCH/CHANGE listing of the 
January paper): delete lines 63100, 
63280, 63300, and 63310. These were 
written and kept in an abundance of 
caution. Change 63300 to 63320 after 
the GOSUB in line 63150. Add a line, 
say 63035, for input of BL, the begin- 
ning line for the change, and EL, the 
ending line; then insert OR LM < BL 
OR LM > EL in line 63350. The forego- 
ing produces a shortening of the pro- 
gram, along with a capability for chang- 
ing only a specified part of the program. 



Another warning is in order here. 
The feature of listing the found lines 
works with a searcli :for the LIST in line 
63270 backwards from the end of 
program memory. If anything with a 
LIST in it is placed m higher line 
numbers, this search will be fouled up. 
And again note: somehow leading zeros 
in line 63270 can get removed; I suggest 
that a few, say 5, colons be inserted 
before INPUT. 



Overview of Major Modification 

Insertion of a CHANGE item longer 
or shorter than the SEARCH item 
requires that spaces either be added or 
deleted. This is accomplished Iby a shift 
of the program in memory and 
corresponding changes of all the next- 
address pointers. Needless to say, the 
part of memory space being used by 
SEARCH/ CHANGE must not be 
jiggled, else its operation will be clob- 
bered. So that the SEAR.CH/CHANGE 
program can remain fij:ed in memory 
and all the Applesoft operational 
pointers functional, spacers— colons — 
are added in line 62999. 

Memory Move 

The heart of this modification is the 
memory move call from Applesoft. (See 
lines 63360 and 63370 :Ln the listing of 
this paper.) The memory move call 
given in CONTACT 5, 5 (June 79) 
works only for integer BASIC; a call to 
the Apple HOTLINE p:roduced the m- 
formation that the move call had to be 
routed through a short machine 
language routine. The routine supplied 
by Apple is the following: POKE 
768,160; POKE 769,0: POKE 770,76: 
POKE 771,44: POKE 772,254. The 
corresponding call is then CALL 768. 
This location is $300-$304. I use that 
space for my SLOW UST utility, so 
'changed to location $342-$346 with no 
ill effects. (See line 63010.) 

One block of memory caimot be 
moved into a second block overlapped 



by the first. This is because one byte 
would be moved into another before 
that byte's content had been read. Thus 
a two-step procedure is required. Line 
63360 moves the memory block to the 
top of memory just below HIMEM and 
line 63370 moves it back to the desired 
end location. 

Next-Address Pointers 

Recall how Applesoft stores BASIC 
in memory. The end of each line is 
indicated by a zero byte. The next two 
bytes contains a pointer, low byte first, 
to the next line's first byte, the low 
byte of its next-address pointer. When a 
branch is executed, the program skips 
along these pointers from the first until 
the indicated address is found. If any 
next-address pointer points to a wrong 
address, all gang a-gley. So until all 
these pointers are put aright, the pro- 
gram being searched and changed is 
simply hidden from the operating pro- 
gram. Line 63160 POKEs the next- 
address pointer for line 63000 into the 
pointer location of line 1; after the dust 
settles, line 63230 restores the original 
pointer. 

Other Matters 

A search is made from the end of 
program memory to find two things: 
the location of the LIST in line 63310, 
and the location of the beginning of line 
62999. This search is done by line 
63020. Two numbers, 540 and 1730, 
are set for SEARCH/CHANGE exactly 
as written (lines 63000 and following) 
in the listing. The first number causes a 
skip from the end of the program to the 
immediate neighborhood of LIST, the 
second, a skip from LIST to near the 
end of line 62999. One effect of this 
search is a delay after the return follow- 
ing RUN 63000. A too-short delay 
should alert the user that line 62999 
might not have enough colons for 
substantial changes. If the colons are 
depleted, line 63350 halts the change 
operation and prints a message to that 
effect. 
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52999 END 



63000 DIM SK(100),NT(100),L(100) 
rSTART = 256 * PEEK (IQi*) + 
PEEK (103):FINI = 256 * PEEK 
(106) + PEEK (105) 

63010 HM = 256 * PEEK (116) + PEEK 
(115): POKE 83ij,160: POKE 83 
5,0: POKE 836,76: POKE 837,1* 
k: POKE 838,25lt 

63020 FOR WW = FINI - 51»0 TO STA 

RT STEP - 1: I F X = AND PEEK 
(WW) = 188 THEN W = WW:X = 1 
sWW = WW - 1730 

63030 IF 256 * PEEK (WW + 1) + 

PEEK (WW) < > 62999 THEN NEXT 

6301*0 NL = 256 ♦ PEEK (WW - 1) + 
PEEK (WW - 2):C0 = NL - WW - 
10: HIMEM: HM - WW - 100 
63050 IF 256 * PEEK (START + 3) 

+ PEEK (START + 2) < > 1 THEN 
PRINT "YOU MUST ENTER YOUR 
SEARCH ITEM AS LINE": PRINT 
"1 BEFORE YOU RUN 63000.": HIMEM;; 
HM: END 
63060 LIST 1,2: PRINT : PRINT "P 
LEASE VERIFY IF THE COMPUTER 
TAKES": PRINT "THIS AS YOU 
INTENDED, DO YOU WANT": INPUT 
"TO CONTINUE (YES OR NO)? "; 
Y$: PRINT : IF Y$ < > "YES" 
THEN HIMEM: HM: END 
55070 PRINT "THE CHANGE ENTERED 
WILL BE MADE IN THE": PRINT 
"RANGE OF LINES CHOSEN. ENTE 
R": INPUT " THE BEGINNING 
LINE ";BL: INPUT " THE 
ENDING LINE ";EL: PRINT 
63080 NF = 256 * PEEK (START + 1 

) + PEEK (START) 
63090 FOR I » TO 255:SK(I) = PEEK 
(START + 1* + 1): IF SK(I) < 
> THEN NEXT 
63100 N « I - 1 

63110 IF SK(0) = 31* THEN FOR I = 
1 TO N:SK( I - 1) = SK( I ): NEXT 
:N « N - 1:SQ = 1 
53120 M - START + N + 6 + SQ:INC = 
0:CH » 0: IF 256 * PEEK (M + 
3) + PEEK (M + 2) < > 2 THEN 
CH = 1: GOTO 63170 
63130 FOR 1 = TO 255:NT(I) = PEEK 
(M + 1* + I ): IF NT(I ) < > 
THEN NEXT 
6311*0 NN = I - 1:ADD = NN - N:M = 
M + NN ♦ 6:WW = WW - ADD(ADD 
< 0) + 8 
63150 IF NT(0) = 31* THEN FOR 1 = 

1 TO .^N:NT(I - 1) = NT(I): NEXT 
:NN = NN - 1:ADD = ADD - 1 



63150 X - INT (NL / 256):Y = NL - 

256 • X: POKE START + 1,X: POKE 
START, Y 
53170 LM = 256 • PEEK (M + 3) + 

PEEK (M + 2):NA = 256 * PEEK 
(M + 1) + PEEK (M): IF LM > 
= 62999 THEN 63230 
63180 FOR I = M + 1* TO M + 255: IF 
PEEK (I) < > AND PEEK ( 
I) < > SK(0) AND PEEK (I) < 
> 31* THEN NEXT 
63190 IF PEEK (I) » 31* THEN SQ = 

SQ + 1 - 2 * (SQ = 1) 
63200 IF PEEK (I) = SK(0) AND S 

Q < > 1 THEN GOSUB 63330 
63210 IF PEEK ( I ) »= THEN NA - 
NA + INC:X * INT (NA / 256) 
:Y = NA - 256 * X: POKE M + 
1,X: POKE M,Y:M =1+1: GOTO 
63170 
63220 NEXT 
63230 X = INT (NF / 256):Y = NF - 

256 * X: POKE START + 1,X: POKE 
START, Y 
6321*0 PRINT : PRINT : PRINT "THE 
ITEM": PRINT " ";: LIST 1: 
PRINT : PRINT "IS FOUND IN 
THE FOLLOWING LINES:": PRINT 
: IF L(l) =0 THEN PRINT " 
NONE.": HIMEM: HM: END 
63250 FOR I = 1 TO n; PRINT L( I ) 

,: «EXT : PRINT 
63260 PRINT : INPUT " DO YOU WAN 
T THESE LINES i-ISTED (YES OR 
NO)? ";Y$: I F Y$ = "NO" THEN 
HIMEM: HM: END 
63270 PRINT : PRINT "THERE WILL 

BE A WAIT AFTER EACH LINE": PRINT 
"UNTIL YOU HIT RETURN TO CON 
TINUE.": PRINT 
6328Q FOR I = 1 TO K: IF L(l ) = 

L(l - 1) THEN 63320 
63290 L$ = "0000" + STR$ (L(l)): 

L$ = RIGHT$ (L$,5) 
63300 FOR " = 1 TO 5: ''OKE W + J 
,1*8 + VAL ( MID$ (L$,J,1)): 
NEXT 
63310 LIST 00050:::::::::: INPUT 

""; Y$ 
63320 NEXT : HIMEM: HM: END 
63330 FOR o = TO I'l: IF PEEK ( 

I + J) < > SK(J) THEN RETURN 

6331*0 NEXT 

63350 IF CO - INC < ADD AND C0| = 
THEN CH = 1:C0? = 1: PRINT 
"THE SUPPLY OF COLONS IN LIN 
E 62999 IS": PRINT "DEPLETED 
. THE CHANGE HAS BEEN MADE" 
: PRINT "THROUGH rART OR ALL 
OF LINE ";LM: PRINT 
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53360 K = K + 1:L(K) = uM: IF CH < 

> OR LM < BL OR LM > EL THEN 
RETURN 

63370 ZS = I + N:X = INT (ZS / 2 
56):Y = ZS - 256 * X: POKE 6 
1,X: POKE 60,Y:X - INT (WW / 
256):Y = WW - 256 * X: POKE 
63, X: POKE 62,Y:ZH = HM - 10 
" WW + ZS:X - INT (ZH / 2 
56):Y = ZH - 256 * X: POKE 6 
7,X: POKE 66, Y: CALL 831* 

63380 POKE 61, X: POKE 60,Y:X = INT 
((HM - 100) / 256):Y = HM - 
100 ■ 256 * X: t^OKE 63, X: POKE 
62,Y:ZS = I + NN:X - INT (Z 
S / 256):Y - ZS - 256 * X: POKE 
67, X: POKE 66, Y: CALL 831* 

63390 WW = WW + ADD: INC » INC + A 
DD 

531+00 FOR J = TO <<N: POKE I + 
J,NT(J): NEXT : I = I + NN 

63410 RETURN 



The perceptive reader will note a 
number of small numbers in various 
lines. These are finagle factors adjusted 
(but probably not optimized) to make 
the program run. For example, the 10 in 
line 63040 prevents the appearance of 
multiple line 62999's for a change item 
shorter than the search item. 

I have also changed the choices for 
search and the way they work. 
Experience has shown no need to 
search both inside and outside strings 
at the same time; it's an either/ or 
situation. To eliminate a needless 
question/ answer routine, the program 
now works as follows: the 
SEARCH/ CHANGE is made outside 
strings only, unless the first character 
of line 1 is the quotation mark. In that 
case, the SEARCH/ CHANGE is made 
inside strings only. For example, 

1 TOTAL 

would search for TOTAL outside 
strings but 

1 'TOTAL 

would search for TOTAL inside strings. 

A quotation mark can be used with 
line 2 in a similar way to sneak ' 'forbid- 
den" words past the interpreter. This 
should be used with care in changes 
outside strings; the interpreter has a 
way of exacting its revenge on sneaky 
things . 



Operation 

Except for the search mode selec- 
tion change, operation of the better 
SEARCH/CHANGE is essentially the 
same as the original. Append 
SEARCH/CHANGE to the program to 
be searched. Enter the seairch item as 
line 1 and the replacement item as line 
2. Note that anything that will list as 
line 1 (or line 2J can be entered. 
Execute with a RUN 63000. 

As mentioned earlier, things can go 
wrong. If the worst happens, try enter- 
ing a new line, or deleting a line, or 
both. That sometimes will save part, or 
almost all of the program. A sensible 
precaution is to check line 62999 often 
and keep it well-stocked with colons. 

Another good idea is to use a SLOW 
LIST utility with SE/JICH/CHANGE. 
(I recommend the one supplied with 
S-C ASSEMBLER H.) Then if a LIST 
command produces endless junk, the 
listing can be aborted without the addi- 
tional hazard of a RESET. 

Another idea is to li:now your 
HIMEM. If something goes wrong, it's 
possible for the HIMEM setting to be 
ratcheted down to a low value. 

A problem I encountered on occa- 
sion and, I trust, eliminated, is the 
DOS 3.2 renumbering program (which I 
keep in memory while programming) 
or the DOS buffers being clobbered, 
probably by an occasional encroach- 
ment into the space above HIMEM. 

iMCftO 





APPLES 

NEED 

ROMS FOR ROMPLUS 

•Jt Now you can realize the full power and ^ 

■)(• usefulness of those now empty sockets ^ 

^ on your ROMPLUS board. ^ 

^ If you have MH's 'Keyboard Filter' then ^ 

^ you know how easy, quick, and }jL 

^ convenient it is to activate and run the ^ 

^ 'Filter' program. Can you visualize v 

^ having other programs, on a ROM, %r 

jt plugged into those empty sockets on a* 

jt your Romplus board and activating j, 

J* them with the same ease and J 

« convenience? If you can visualize it J" 

7 then you can realize it! * 

5 APPLESOFT RENUMBER/ t. 

^ MERGE IN ROM ^ 

^ This invaluable program, made famous ^ 

^ by Apple Computer, needs no ^l 

^ explanation for the serious jt 

jt programmer. When activated, u 

J RENUfVlBER/MERGE IN ROM will not 7 

« distrub any part of a program in 7 

IT memory. Now you can take advantage ^ 

J of this powerful utility without the 7 

* inconvenience associated with getting iT 

* it up and running prior to a * 
TT programming session. Requires 48K, « 

* with or without Disk II $35.95 ^ 
1^ DISK COPY/DISK SPACE t, 

^ IN ROM ^ 

J* A resident disk copy program will make « 

J* it easier, more convenient, and will «. 

2 encourage you to make back-ups on 7 

* your valuable diskettes. ^ 

* • Copies diskettes, from either SINGLE * 
J* or DUAL drive, single or dual con- jj" 
» troller, 13 or 16 sector and with ■* 
^ or without VTOC- ^ 
ik • Options ■ Gross copy. Active Sectors # 
^ only copy, more than one copy, DOS ^ 
^ overwrite for faster copy time, auto ^ 
4fr matic boot of copy disk, free space -j^ 
•jt on disk in sectors and kilobytes. jj^ 
^ • Init and volume number change are ^ 
^ selectable. sl 
^ • All disk error reporting routines with j*. 
jt option to abort. « 
jL Requires a minimum of 32K $35.95 « 



BASICS IN ROM 

Eliminates the added steps of locating. 



o i^iMiiiiidie^ iiie duueu steps ui luudiniy, ^ 

7 installing, running and rebooting witti a * 

* BASICS diskette wtien the need arises to «" 

* go from 16 to 13 sector disks. Just put a t(" 
J 13sectordisk in your disk drive and ^ 
Tt address the Basics ROM. The Basis •}{• 
**■ ROfvl is addressable on coldstart (with- "X" 
■X" out Autostart ROM) or warmstart at any -jt 

* time and will save wear and tear on your ^f 
^ disk drives. Requires a minimum of ^ 
•Jfr 16K $35.96 ^ 

* 'YOUR' PROGRAM LINE * 

* EDITOR (RLE) IN ROM * 

7 If you have this invaluable program m J 

2 software, send us a Diskette which has Ij 

7 only your predefined RLE greeting * 

* program on it (Int or FP version). You * 

* will get back your diskette and a ROM * 

* chip that has ■YOUR' RLE burned into * 
¥: it. The ROM will also have a routine to ^ 

* erase 'YOUR' RLE. ■YOUR' RLE will -Jf- 
^^ install and initialize itself in memory * 
^ and will not affect any Applesoft -X* 
JJ^ prog'rams in memory. Please specify if -jt 
^ your disk is 13 or 16 sector and be sure ^ 
^ no program steps have been added to ^ 
^ the original RLE. Allow 2-3 weeks ^ 
j^ delivery. Only one chip per disk please. ^ 
^ Requires32Kor48K,3 2or3.3 $45.95 ^ 

* 4. 

^ Ait Roms, after they have been C 

* acliviated, will shut down your J 
J Romplus board and reconnect your * 
^f Apple to the I/O hooks of DOS or Basic. * 
■JT All ROM chips can be returned for vT 

* updating to later versions for a nominal "X" 
■3fr charge. Ail chips will be shipped UPS -jf 

* Soft CTRL Systems * 

* BOX 599 Z 

* WESTMILFORD, N,J, 07480 * 
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BASIC THAT SCREEMS 

Is the sedate pace of your OSI BASIC taking the fun out of your 
programming? 

Then turn your system on to FBASIC. 

Now you can compile your programs with FBASIC and takefull 
advantage of your computers potential. 

FBASIC is fast. Not just 5 orlO times as fast as OSI BASIC. 
FBASIC is OVER ONE-HUNDRED TIMES FASTER! Allowing 
you to do unheard of things in BASIC. Things that used to 
require assembly-language. With no need to learn a new 
language. 

The secret to this incredible speed is that FBASIC produces 
native 6502 machine code. With no run-time Interpreter to get 
in the way of all-out machine performance. 

FBASIC is good for any application from wordprocessors to 
video games. Whatever tickles your fancy. FBASIC accepts 
standard BASIC source files, and produces executable disk- 
based object files. It includes many of the features you have 
always wanted: hex constants, convenient machine language 
calls, optional user selection of array locations, and more. 

As an example of its power and performance; FBASIC was first 
written in OSI BASIC, which took 6 hours to compile Itself. With 
many features added since then, it now compiles itself in a little 
over 4 minutes! 

So let that pent-up performance out. Find out what your 
machine is really capable of. Feed it some FBASIC and stand 
back! 

FBASIC runs under OS-65D and requires 48K. 

Available on 8" diskette for $150. 

Please include $5 for shipping & handling. 

PEGASUS SOFTWARE 

P.O. Box 10014, Dept. M-2, 
Honolulu, Hawaii 96816 



THE ALL NEW 

SERIES 2 COMPUTERS 

ARE ON DISPLAY 

WE STOCK THE COMPLETE 
LINE OF AARDVARK 

FOR SAN FRANCISCO AREA 

READERS WE HAVE A 

USERS GROUP MEETING THE 

FIRST SUNDAY OF EVERY MONTH 

SEND $1.00 FOR CATALOGS 

SUNSET ELECTRONICS 

2254 TARAVAL ST. 

SAN FRANCISCO, CA 94116 

(415) 665-8330 

OPEN 7 DAYS 



0^ 




American Data 

The world's largest distributor of 
Ohio Scientific Microcomputers 



ANNOUNCES 

The availability of the new Ohio C2-D and C3-D (10 MB 8" 
hard disk units) and the C1P Series 2 converted by American 
Data for European power. 

American Data is the exclusive distributor of OSI 
microcomputers to Europe. Dealer inquiries invited: Contact 
David O'Brien (301) 840-9540. Telex: 64405 (USA). 
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Vectors 

and the 

Challenger 1 P 



1$ 

H 



Vector is one more computer 
buzzword usually found In 
conjunction with confusion. This 
article will try to clear up what 
vectors are and will show how to 
use them effectively. 



Mike Bassman 
39-65 52nd Street 
Woodside, New York 11377 



Computers have subroutines for every 
command and for every other necessary 
function. Computers also need places 
in memory to look up the address of a 
particular subroutine. A vector is a 
place in memory in which the com- 
puter finds the address of a subroutine. 
The vector will consist of two bytes 
containing any address from $0000 to 
$FFFF in low-byte, high-byte format. 

I'll try to clear this up with an ex- 
ample. Let's say you type in a SAVE 
command. The CIP must know where 
to go to find the SAVE subroutine. The 
CIP looks at the SAVE vector, which is 
at $220 and $221 (544 and 545 
decimall, and in it finds $96 and $FF, 
which is $FF96, the address of the 
SAVE routine. 

What good are vectors? They are 
used if you want to add to BASIC or 
change it or any of its commands. Vec- 
tors have been used to create shorthand 
(see MICRO 24:25), do a true 
backspace, and ensure program securi- 
ty. Let's take program security as an 
example. A good way to prevent copy- 
ing of tapes is to disable the SAVE com- 
mand. We want the SAVE command to 
coldstart BASIC if someone tries to 
save a program. The SAVE vector must 
be changed from pointing at the SAVE 
routine at $FF96 to the coldstart ad- 
dress at $BD11. Therefore, the SAVE 
vector at 544 and 545 must point at 



$BD11. These tv/o poke commands 
will take care of it: 

POKE 544,17 
POKE 545,189 

Now, if you type SAVE, the CIP 
will respond with "MEMOEIY SIZE?". 
Although the CIP has vectors for every 
command, a large portion of them are 
in ROM rather than in RAM. Since only 
RAM and not ROM can be changed, on- 
ly those vectors residing in RAM can be 
used. Vectors in RAM, their addresses, 
and the address that they point at in- 
itially are listed below. 



Vector 


Address 


Initial Value 




Hex Dejcimal 


Hex Decimal 


SAVE 


220,221 544,545 


FF96 65430 


LOAD 


21 E,21F 542,643 


FF8B 65419 


CTRLC 


210,210 540,541 


FF9B 65435 


OUTPUT 


21A,21 8 538,539 


FF69 65385 


INPUT 


218,219 536,537 


FFBA 65466 


WARM 


001,002 001,002 


A274 41588 


START 







The first two vectors, the SAVE vec- 
tor and the LO^iD vector are used 
whenever the SAVE and LOAD com- 
mands are executed. The Control-C 
vector is somewhat more subtle. For 



every line of BASIC executed, BASIC 
checks the keyboard for a Control-C. If 
one has been typed, program execution 
ends. This vector is the one that is used 
for every line executed. Therefore, we 
can use this vector, if our function is 
one that would be executed once for 
every line, just as we would use a pro- 
gram tracer. The output vector is used 
each time BASIC wants to type a 
character. The input vector is used 
each time BASIC wants to input a 
character. 

Let's try a more involved example. 
This time, we'll change the cursor from 
the underline to, say, a tank character. 
The program will require use of the in- 
put vector, because we will have to 
change the cursor each time a character 
is inputted. The program will be in the 
free part of page 2, starting at $222 (546 
decimal). BASIC stores the cursor loca- 
tion at $200 (513 decimal). This is used 
as an index from screen location $D300 
[54016 decimal). Since BASIC resets 
the input vector after carriage return is 
hit, we will set the input vector to $222 
after every character. The program 
follows. 

Using these techniques, Ohio 
Scientific CIP users can customize 
BASIC to their convenience. 









BASSKAN: VECTORS ANB 


THE CHALLENGER IP 


0222 






OEG 


$0222 




0222 48 






PHA 




SAVE ACCUMULATOE 


0225 8A 






TXA 




PUT X IK A 


0224 48 






PHA 




AND SAVE 


0225 AE 


00 


02 


LDX 


$0200 


GET CUESOE LOCATION 


0228 A9 


FA 




LEA 


#$FA 


GET TANK CHAEACTEE 


022A SV 


00 


1)3 


STA 


$1)300, 


X STOEE WITH INDEX 


022D 68 






PLA 




GET X FEOM STACK 


022E AA 






TAX 




AND PUT INTO X 


022F A9 


22 




LDA 


#$22 


LOW BYTE— INPUT VECTOE 


0231 BD 


IB 


02 


STA 


$0218 


AND SAVE 


0234 A9 


02 




IDA 


#$02 


HIGH BYTE—INPUT VECTOE 


0236 8D 


19 


02 


STA 


$0219 


AND SAVE 


0239 68 






PLA 




GET A 


023A 4C 


BA 


FF 


JMP 


$FFBA 


AND EETUEN MICRO' 
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THE STAR MODEM 

From Livermore Data Systems 



RS232 MODEM 
IEEE 488 MODEM 
RS232 CCITT 
IEEE 488 CCITT 



SALE $135 

SALE $245 

$170 

$280 



STAR Modem is the price performance leader with a full 
2 YEAR FACTOR" WARRANTY. 




WE CARRY THE BLACK APPLE 



BellbHoiuell 

inppic computer inc. 



MIPLOT Intelligent Plotter 
by Watanabe Instruments (DIgiplot) 



SPECIAL 
$1095 




EBS Business System for PET/CBM $795 

Extremely comprehensive package for small business. 
Fully Integrated inventory and accounts receivable system 
Including Invoices, packing slips, mail labels, statements, 
bank deposit slips, and 17 reports. Allows any of 10 
standard letters to be merged with customer record info on 
either a selective or complete file basis Demo disk and 
system description available for $3.00. 

OZZ Data Bast; System for C B M 8032 $335 

Flexible file handling and report writing package for such 
applications as: Inventory Control; Management Informa- 
tion, Mailing List; Scheduling; Medical Record Keeping; 
Accounting 



KM MM Pascal for PET $75 

Subset of standard Pascal with true machine language 
translator for faster execution. 16K with tape or disk. 

EARL for PET (disk file based) $65 

Editor, Assembler, Relocater, Linker to generate relocat- 
able object code. 

luliFORirH+ for7ET/CBM $65 

A full-featured FORTH with extensions conforming to Forth 
Interest Group standards. Includes assembler, string process- 
ing capabilities, disk virtual memory multiple dimensioned 
arrays, floating point and integer processing. 



• Incorporates all intelligent functions required for pro- 
ducing graphs and drawings Including 8 vector and 4 
character commands. 

• Distance accuracy within 1%, repetition accuracy 
within .01 inches, programmable step size .004 Inches, 
internal interpolation in .002 steps. 

• Solid and broken line types can be specified. 

• Character generator for letters, numerals and symbols. 
Characters can be enlarged and rotated In four orienta- 
tions. 

• Coordinate axes can be drawn by simply specifying the 
graduation interval and number of repetitions. 

• Sell test mode automatically draws complete test pattern 

• Printer mode outputs character data In 16 sizes with 4 
orientations. 

• Connection to any microcomputer using parallel 7-blt 
ASCII code 

• Can use simple cable to parallel port, or special inter- 
face to IEEE or other 

• Modular control circuit and mechanical constnjction, 

• Uses any hard fiber-tip pen. 

• Uses 11x17 paper. 

Includes power supply, I/O connector, 2 pens, 50 sheets of 
paper, and complete manual. 



6502 

6502A 

6520 PIA 

6522 VIA 

6532 

2114-L450 

2114-L300 

2716EPROW 

2732 EPROM (TMS2532) 

4116-200 as »AM INECI 

S-100 Wire Wrap $2.65 



7.45 10/6.95 

8.40 10/7.95 

5,15 10/4.90 

6.45 10/6.10 

7 90 10/7.40 

3.95 

4.45 

13.45 



50/6.55 100/6.15 

50/7.35 100/6.90 

50/4.45 100/4.15 

50/5.75 100/5.45 

50/7.00 100/6.60 

20/3.75 100/3.45 

20/4.25 100/3.95 

5/12.75 10/11.85 

29.50 

8 far 35.00 

Solder Tall $2.15 
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CASSEnES-AGFAPE-611 PREMIUM 

High output, low noise, 5 screw housing, labels. 
C-10 10/5.65 50/25.00 100/48.00 

C-30 10/7 30 50/34.00 100/66.00 

All other lengths available Write for price list. 

A ATARI 800 $777 
All Atari Modules 20% OFF 
SPECIAL-purchase ATARI 800, receive 
extra 8K memory FREE. 
EDUCATIOiNAL PLAN - buy 2 ATARI 
Computers, receive 1 ATARI 400 FREE! 



CBM-PET SPECIALS 

/V Up to $235 free 
-<^ merchandise with purchase of 
^ one of following CBM-PET iteins! „,, 

8032 32K - 80 Column CRT $1795 235 

8016 16K - 80 Column CRT $1495 205 

8050 Dual Disk Drive-1, 020,000 Bytes $1795 235 



DISKS 

(wrife for quantity prices) 




SCOTCH (3M) 8" 10/3.10 

SCOTCH (3M) 5" 10/2.95 

Maxell 5" Double Dens 10/4.25 

Maxell 8" Double Dens. 10/4.65 

Verbatims" 10/2.40 
(add .75 for plastic storage box 

Verbatim 8" Dbl. Dens. 1 0/3.35 

BASF 5" 10/2.60 

BASF 8" 10/2.40 
Diskette Storage Pages 

Disk Library Cases 8' 



50/2.85 100/2.75 
50/2.80 100/2.70 
50/4.10 100/395 
50/4.50 100/4.35 
50/2.35 100/2.30 
for Verbatim 5") 
50/3.25 100/3,15 
20/2.50 100/2.40 
20/2.35 100/2.30 
10 for 3.95 
-2.85 5" -215 



CBM Modem - IEEE Interface 
CBM Voice Synthesizer 
8N Full size graphics keyboard 
16K Full Size Graphics or 

Business Keyboard 
32K Full Size Graphics or 

Business Keyboard 
2040 Dual Disk Drive - 343,000 bytes 
2022 Tractor Feed Printer 
C2N External Cassette Deck 
UsedPETs(8, 16, and32K;i 
WHITE FOfl SYSTEM PRIICE!|^ 

"EDUCATIONAL DISCOUNTS** 

Buy 2 PET Computers, get 1 FREE 

CSfvl Full Size Graphics Keyboard $ 74 

WordPro III - 32K CBM, disk, [Xinter $170 

WordPro IV - 8032, disk, printer $255 



$395 50 
$395 50 
$795 100 

$995 150 

$1295 205 

$1295 205 

$795 100 

$95 12 

CALL 



EPSON MX-80 Printer $545 

C. Itoh Daisy Wheel Printer $1575 

Centronics 737 Proportional Spacing Printer $795 

NEC Spinwriter - parallel $2450 

XYMEC Hl-Q 1000 Intelligent Daisy Wheel $1975 

Leedex Video 1 00 1 2" Monitor $1 29 
ZENITH OATA SYSTEMS 

Zenith Z19 Terminal (factory asm.) $735 

Zenith Z89 with 48K _ $2150 

SYIVl"-i $209 

SYM BAS-1 BASIC or RAE-1/2 Assembler $ 85 

KTM-2/80 Synertek Video Board $349 

KIM-1 (add $34 for power supply) $1 59 

Seawell Motherboard - 4 K RAM $ 1 95 

Sea_well 16K Static RAM - KIM, SYM, AIM $320 

KL-4M Four Voice Music Board and Visible Music 
Monitor (4 Voice) for PET $59.90 

FLEXRLE Database-Report Writer by Michael RItey 
Fl_exible_flle handler for PET/CBM 

MICRO-REVERSI for Sf brMlchaei'Riley"" $9.95 
Machine language version— you can't win at Level 5. 

PAPER-MATE 60 Command PET Word Processor $29.95 
Full-featured version by Michael Riley 

A P Products 15% OFF 
APHobby-Blox 15% OFF 

ALL BOOK end SOFTWARE PRICES DISCOUNTED 




VISICALC for PET ATARI 

BPI General Ledger, A/P, A/R for PET 



$170 
$270 



Programmers Toolkit - PET ROM Utilities $34.90 

PET Spacemaker Switch $24.90 

Dust Cover for PET $6.90 

IEEE-Parallel Printer Interlace for PET $65.00 

IEEE-RS232 Printer Interface for PET $149.00 



Montgomer>ville. PA 18936 215-699-5826 A U UORipUlBrS 



The 8086 Book (Osborne) $12.75 

Z8000 /Assembly Language Programming $10.60 

PET Personal Computer Guide (Osbane) $12.75 

PET and the IEEE-488 Bus (Osborne) $12.75 

6502 Assembly Language (Osborne) $ 9.90 

Programming the 6502 (Zaks) $10.45 

6502 Applications Book (Zaks) $10.45 

6502 Software Cookbook (Sceibi) $ 9.45 

CP/M Handbook (w/ MP/M) Zaks $11.85 



WRITE FOR CATALOG. 
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PET 

Symbolic 

Disassembler 



Most disassemblers output only 
absolute addresses. This 
symbolic disassembler 
generates labels and symbols 
for these addresses, making the 
disassembled program much 
more understandable. 



Werner Kolbe 
Hardstrasse 77 
CH5432 Neuenhof 
Switzerland 



If you want to understand how pro- 
grams written in machine code work, 
you need a clear and comprehensive 
listing. For this purpose I developed a 
disassembler [listing 1) which produces 
a listing nearly like one from an 
assembler— only the remarks are mis- 
sing. Because I used the program main- 
ly to get a complete listing of the PET 
ROM routines, the program also con- 
tains a short machine routine to over- 
come the PEEK limitation. The pro- 
gram automatically creates names for 
all memory locations used by the 
machine program. It also calculates the 
absolute addresses of all branches and 
assigns labels automatically. Listing 2 
shows an example of a listing produced 
by the disassembler. 



Using the Disassembler 

Because the program is very simple 
to use, explanations are not included, 
in order to save space. The program 
first asks for the output device number, 
which should be 3 for the screen or 4 for 



the printer. Then it asks for the start 
address (origin) of the program to be 
disassembled. The address has to be 
entered in hexadecimal without a 
leading $ sign. Leading zeros are not 
necessary. Program operation can be 
stopped by pressing the SPACE key and 
continued by pressing the key a second 
time. By pressing the HOME key, the 
program jumps back to the start, asking 
again for the output device and the start 
address. However, it still holds all 
names created thus far. To get a com- 
plete listing it is necessary to go 
through the machine code a second 
time, because all labels created by 
backward jumps can only be resolved in 
a second pass. Tables of the labels and 
variable names sire printed when, in- 
stead of a start address, the following 
keywords are entered: 

PM all labels are listed 

PL only the labels created by a 
branch (they start with L) are 
listed 

PJ only the labels created by a 
JMP or JSR are listed (they 
start with J) 

PZ a listing of all zero-page 
memory places used is given 
(their riamejs start with Z) 

PW a listing of all memory 
places above page zero 
used by the program is given 
(names starting with W). 

By entering "ENTOY" instead of a 
start address, you can name your own 
variables. This must be done before the 
program has creal:ed a name, because a 
variable cannot be defined twice. Provi- 
sion for entering youi' own label names 
has not been made. You can leave the 
"ENTRY" -mode by entering END as a 
name. Addresses in "EN^rRY"-mode 
must be hexadecimal without a leading 
$ . The program itself occupies less than 
4K bytes, but to pro\'ide enough space 
for all addresses and names that have to 
be stored, you should have at least 
about 16K bytes of memory' available. 



Program Description 

Line No. Description 

5 determines the dimension of 

arrays L,L$, and P,P$ which 
contain the labels (L) and the 
page>0 (P) names. If you 
have a new ROM and enough 
memory you could set DM 
and PM to higher values. 

10. ..15 loads a short machine 
routine which overcomes the 
PEEK limitation in the old 
ROMs. 

20 dimensions the arrays, 

M$ = mnemonic code, 
Z%= zero-page addresses, 
Z$ = zero-page names, L, P 
(see above) 

25 the addresses are assigned 

to provide the headings for 
the listings. 

35 reads mnemonic code, in- 

cluding addressing index. 

45 assigns output device. 

50.. .72 PL is a "text"-flag. If FL = 0, 
then text mode is assumed 
until a zero is found. The 
"address" in E$ is in- 
vestigated in the following 
lines to detect the keywords. 

7 5... 90 subroutine 280 changes E$ 
into a number in E. P is a 
pointer to the current ad- 
dress. Subroutine 325 
searches for a label under the 
address in P. S = l tells the 
subroutine not to create a 
label if none is found. 
Subroutine 300 performs a 
decimal to hexadecimal con- 
version. Subroutine 295 per- 
forms an "E = PEEK(P)" and 
the hexadecimal of E is 
returned in E$. 
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92 separates mnemonic code 

and addressing index. 

95 jumps to the subroutines 

according to the addressing 
index. 

105 the start/stop feature using 

the SPACE key. 

130 prints the mnemonic code at 

the correct place. As TAB 
does not work on my printer, 
a counter K and the SPC 
function is used. 

135... 160 handles implied addressing 
and text. 

165 immediate addressing mode. 

170 zero-page addressing mode. 

175 fetch operand; print it and 

mnemonic; look for entry in 
the address table and create 
name, if not found 
(subroutine 380]; print name 
plus addressing string. 

180 zero-page, X addressing 

mode. 

185 zero-page, Y addressing 

mode. 

190 absolute addressing. 



195. ..205 same task as. 175, only for ab- 
solute addressing. If no new 
names can be created because 
the arrays F',P$ are full, the 
address is printed in hex- 
adecimal. 

210 absolute, X addressing. 

215 absolute, Y addressing. 

220... 230 relative addressing. If the 
label was created anew and 
the branch is backward, the 
address is printed in hex- 
adecimal. The sam^e occurs if 
the arrays L,L$ are full. 

235 (indirect), X addressing. 

240 [indirect), Y addressing. 

250 absolute indirect addressing; 

the operaind is printed in hex- 
adecimal. It seemed to be un- 
necessar,? to create a table of 
two-byte pointer names only 
for this seldom-use:d address- 
ing mode. 

260 accumulator addressing. 

265. ..275 JMP and JSR absolute. 
Similar task as 220... 230. 

280... 285 converts hexidecimal in E$ 
to decimal in E. 



290... 320 increments code pointer P, 
PEEKS the memory location 
P, and returns the value in E 
and ES. 

325... 375 looks for the address E in the 
array L; if found, returns cor- 
responding name in L$; if 
not, creates a new name and 
sorts the table. The new 
name starts with "L" or "J" 
and continues with a current 
number which is the "end of 
table L" pointer LL. A binary 
search is executed to improve 
program speed. 

380... 415 same as above but for zero- 
page addresses. 



420... 465 same as above but for 
dresses above page zero. 



ad- 



470... 540 mnemonic code and assigned 
addressing index. 

545... 605 prints address tables and 
enables entry of addresses 
and corresponding names. 

Werner Kolbe is a German computer 
enthusiast who has been living in 
Switzerland since 1977, working as an 
electrical engineer in the field of power 
system protection. In 1978 he bought one 
of the first PETs available in Europe. With 
some programming experience in 
FORTRAN gained on a large IBM 
computer, using his PET is really 
enjoyable. 



r\ 



ri I SRSSEMELER 



5 DM=255-PM=50 

1 e FOR I = 1 1 1 TO 1 1 7 : REFlDfl : POKE I . fl ^ HEIXT 
DflTfil73 ..0.0. 141,250.3.96 

DIMM$(255) . L*<Dh1> . L(DM> . 2:^'<255) .. Z*<255) . P<PM) . P^-CPM.-) 
riM=DM-l:PM=PM-l:Z$';0:J="ZERO":L*«:0>="LRBEL":P$<0)="PflGE 
FOR I =010255 : REFillM* ( I ) •• NEXT 
CL0SE1:INPLIT"0UTPLIT LEV. #";ri:PRIHT-OPEHl .D. 1 

PRIHT •■ IFE*="PM"THENV*="" : G0T0545 
G0T0545 



15 

20 

25 

30 

45 

50 

55 

60 

65 

70 

72 

75 

30 

35 

90 

32 

95 

105 

110 

115 

120 

125 



>0" 



IFL$0" "THEHFU=1 



FL=l: INPUT" ORG";E*:| 

IFE*="PL"THENV*="L":i 

IFE*="P..T"THEHV*="J" : G0T054? 

IFE*="P2"THEN560 

IFE*="PW"THEN570 

IFE*="ENTRV"THEN600 

GOSLIE280:P=E-1 

p=p-f-l : E=P : S=l : G0SUB325 : 

GOSLIB300 

PRIHT#1.SPC:";5-LEN<E*>>E*J ••G0SUB295:PRINT#1. " "E*; ••K=5 

M*=LEFT* < M* C E > . 3 > : B= VflL •; M I D* ( M$ <: E ) . 4 ) > 

ONB.*FL+1GOSIJB135.165.170. 180. 185. 190.210.215.220.235.240.250.260.265 

GETE$ : IFE$0" "THENVf=" " : GOSUBl 15 

GOTO80 

IFE*=V*THENGETE$ : V$="" ■ GOTOl 15 

I FE$= " a" THENPR I NT# 1 •■ G0T045 

RETURN 
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130PRINT#1." "E*SPC<K;«LtSPC<7-LEN<L*;OM*" "j -RETURN 

135 I FFL= 1 flHDM*<:> " ? " THENPR I HT# 1 . SPC < 8 > L*SPC ( 7-LEH < L$ ) > M* •■ RETURN 

140 FL=0: IFM*="BRK"THENFL=1 :PRINT:RETURN 

145 PRINT#1.3PC:<;i5>"? : "CHR*<34>.: : IFE>30flNDE<128THENPRINT#l.C:HR*<E) 

1 50 I FE<30THENPR I NT# 1 . CHR* C E+64 > 

155 IFE>12?THENPRINT#1. CHR*<E-128> 

160 RETURN 

165 GOSUB290 : G0SUB13G1 : PRINT#1 , "="£$ ■ RETURN 

170 V$="" 

1 75 GOSUE290 : GOSUEl 36 •' GOSUB380 : PRINT* 1 . Z*V* : RETURN 

180 V*="vX"- GOTO 175 

185 V*="/t"': GOTO 175 

190 V*="" 

195 GOSUB290:PRINT#1." "E$J :H$=E$-GOSUB290 ■•K=2 

200 GOSUB130 ■■ E*=E*+H* : GOSUE280 ■ GOSUB420: IFP*0" " THENPR I NT# 1 . P*V* ■ RETURN 

205 PR I NT# 1 . E$\tt ■■ RETURN 

210 V$="..X"- GOTO 195 

215 V*=".V"- GOTO 195 

220 GOSUB290:Rl=E:GOSUB130:E=fll+P+l •■ IFRl>127THENE=P-255+fll 

225 V*="L" : S=0 •■ G0SUB325 •■ IFBTHENPRINTttl .. L* ■ RETURN 

230 GOSUB300:PRINT#1.E*:RETURN 

235 V*=".K)":G0T0245 

240 V*=">.V" 

245 GOSUB290 •• GOSUB130 ■ GOSUB380 : PRINTil . " < "Z*V* : RETURN 

250 GOSUE290 •■ PRI NT#1 .. " "E*; : H*=E* : GOSUB290 = K=2 : GOSUB130 

255 PR I NT# 1 . " < "E*H* " y " ■ RETURN 

260 PRINT#1 . SPC<8>L$SPC<7-LEN(L$> >M*"ft" ■■ RETURN 

265 G0SUE29ei : PRINT#1 .. " "E*.: : H$=E* : GOSUE290 : K:=2 : GOSUB130 • E*=E$+H* ■ GOSUE280 

270 V$="J" ■■ S=0 • G0SUE325 = IFL*<>" "THENF^RINT#1 . L* : RETURN 

275 PRINT#1..E*:RETURN 

280 E=0-FORI=1TOLEN<E$> ••E=RSC<MID*<E*. 1. 1)>-48- IFB>9THENE=B-7 

285 E=E* 1 6+E •• NEXT : RETURN 

290 P=p+1 

295 E=INT(FV256> ••POKE1013.E:B=P-E*256 POKE1012.B:SVS1011 :E=PEEK<101S) 

300 B=E:E*="" 

305 H=INT':B/16) : B=INT*:E-16*H:j ••B*=CHR.|:<E+48> •• IFB>9THENE$=CHR*<55+B) 

310 E*=B*+E* •■ IFH>=1THENE=H : GOTO305 

3 1 5 I FLEN ( E$ > <2THENE*= " " +E* 

320 RETURN 

325 B=-l:H=LL+l 

330 I = INT':: <H+B,V'2> : IFL< I :)=ETHENB=1 ■ L*==L$< I > : RETURN 

335 I FL < I > >ETHENH= I : G0T0345 

340 B=I 

345 IFRES<H-E»1THEN330 

350 IFSOR<LL>DM)THENB=0:L*=" ": RETURN 

355 LL=LL+l:IFL<I><ETHENI=I+l 

360 F0RB=LLT0I+1STEP-1:L<B>=L<E-1>:L*(B>=L$<B-1>-NEXT 

365 L a !) =E •• Lf •; I > =V*+M I D* < STR* < LL > .. 2 > 

370 E=0 : L*=L* < I > : I FE>PTHENB= I 

375 RETURN 

380 B=-1-H=Z2+1 

385 I = INT0;H+B)/2> ■ IFZ"ia>=ETHENZ*=Z$(:i> -RETURN 

390 I Fz;-: •:: i :j >ethenh= i ■ GOTO400 

395 B=I 

400 IFflBS(H-B>>lTHEN385 

405 zz=zz+ 1 ■• i fzj; < i xethen i = i + 1 

410 forb=zztoi+istep-i:z:<;cb>=z.'^<b-i>:z*<b)=z$<b-i>:next:z;':<i>=e 

412 1 FS=2THENZ* ( I ) =V* •• RETURN 

415 Z$<. I >="Z"+MID*(STR*<22>. 2> ■ Z$=Z*'; I > ■ RETURN 

420 IFE<256THENGOL=;UE380 : P*=Z* : RETURN 

425 B=-l:H=PP-H 

430 I = INT< ■:;H+B)/2) ■■ I FP«:: I >=ETHENP*=P*':: I > ■ RETURN 

435 IFP< I »ETHENH=I ■ G0T0445 

440 B=I (continued) 
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445 IFflBS<H-B;'>lTHEN43e 

450 IFPP>Ft1THEHP*="" : RETURN 

455 PP=PP+1-IFP<D<ETHENI=I + 1 

460 FORE-PPTOI + lSTEP-1 ••P<B:)=P<B-1 > •■p*<B>=P*<E-i:5 ■■NEXT-P< I)=E 

462 IFS=2THEHP$i; I >=V* : RETURN 

465 P$a>="W"+MID$<STR*';PPX.2>:P*=P$'; I) RETURN 

476 DFlTflERK. 0Rft9, ?.. ?. ?.. 0Rfl2. flSL2. ?.. PHP.. ORfll , fiSL12. ?.. 7, 0Rfl5,flSL5. ?.. BPL8. ORflie 

475 DflTfl?.. ?.. ?.. ORflo'.. flSL3.. ?. CLC 0Rfi7.. ?.. ?.. 7, 0Rfl6. filSL6. ?. JSR13.. mW, ? 

480 DflTR?.BIT2.BND2.R0L2.?.PLP.flNDl.RCiL12/?. BITS. flND5.ROL5r?.BMI8.flND10. ?..?,? 

4S5 DflTflRHHS.. RCIL3.. ?.. SEC.. flHri7.. ?.. ?.. ?.. RND6. R0L6. ?. RTI . E0R9. ?.. ?.. 7, E0R2. LSR2 

490 DRTFI?. PHfl. EORl . LSR12. ?. JMP13.. E0R5. LSR5. ?.. EVC8. EOR10. 7, ?.. 7, E0R3. LSR3. ? 

495 nnTflCLI .. ECiF:7.. ?.. ?.. ?.. E0R6.. LSR6. ?.. RTS. flUCS. ?.?.?.. flDC2.. R0R2. ?. PLfl, flDCl 

500 DRTflROR 1 2 .. ? . -JMP 1 1 . RriC5 .. R0R5 .. ? .. BVS8 . RDC 1 ©..?,?..? . flDC3 . R0R3 . ? . SE I . flDC7 . ? . ? 

505 DRTR?, RDCe.. R0R6.. ?.. ?.. STflS.. ?.. ?.. STV2.. STR2.. STX2. ?.. DEV, 7, TXfl.. 7^ STV5. STflS 

510 DRTRSTXS. ?.BCCS.. STR10.. 7, ?. STV3.. STR3. STX3, ?. TVR. STR7. TXS. 7> 7> STfl6. 7, 7 

5 1 5 DRTflLDV 1 .. LDRS . LDX 1 .. ? .. LriV2 . LriR2 .. LDX2 .. ? .. TRV . LDR 1 . TRX . ? . LDV5 , LDfl5 , LDX5 . 7 

520 DRTRBCSS .. LDR 1 .. ? > 7 .. LDV3 . LIiR3 . 10X4 . ? . CL V . LIifl7 . TSX .. ? .. LDV6 .. LDfl6 , LDX7 > 7 

525 DRTflCPVl .. CMPS.. ?.. 7, i::PV2.. C:f1P2.. DEC2.. ?. IHV. CMPl . DEX.. 7, CPV5. CMP5, DECS. ? 

530 DRTRBMES.. CMP10.. ?.. 7> 7, CMP3. DEC3. ?. CLIi. CMP7. ?. 7, 7, CMP6. DEC6. 7. CPXl . SBC9 

535 DRTR? .. ? .. CPX2 .. SEC2 .. I NC2 .. ? . I NX .. SBC 1 . NOP . ? . CPX5 .. SBC5 . 1 NC5 .. ? .. BEQ8 . SBC 1 6 . ? . ? 

540 DRTR? .. SEC3 .. I HC3 .. ? .. SED . SEC7 .. ? .. ? . ? . SEC:6 . 1 HC6 . ? 

545 FuRI=0TOLL : IFV-*0""THENIFLEFT*(;L-*a>. 1 ><>VfTHEH555 

5.50 E=L'; I ■■> ■■ GOSUB300 ■ PRINT#1 . L*< I >SPC<8-LEN';L*< I ) > >E*SPC<8-LEH<E$> > J 

555 NEXT •■ PR I NT# 1 ■• GCiT045 

560 FOR I =0Ti:i2Z ■ E=Z.--: '■. I ') ■ GOSUE300 

565 PR I NT# 1 .. Z$ •: I ;• SPC < S-LEN <: Z$ <l)y> E*SPC < 8-LEN< E* > > .; ■• G0T0555 
570 FOR I =0TOPP : E=P < I > : GOSUB300 

575 PR I NT# 1 .. P* (. I ;:• SPC < S-LEN <. P* < I ) > > E*SPC< S-LEN <Ef>:>r- G0T055S 
600 S=2 : 1 NPIJT " NRME .. RDRESS " ; V$ . E* : I FVfO " END " THENGOSUE280 • GOSUB420 ■ GOTO600 
605 G0T045 

1 800 FOR I = 1 4T033 ■• PR I NT I CHR$ ( 34 ) CHR* < I > CHR* <34 > ; ■ NEXT 
RERDV. ^^K»0- 
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32 K BYTE MEMORY 

RELIABLE AND COST EFFEQIVE RAM FOR 
6502 (j 6800 BASED MICROCOMPUTERS 

AIM eS-'^KIM'SYM 

PET*S44-BUS 



• PLUG COMPATIBLE WITH THE AIM-65/SYM EXPANSION 
CONNECTOR BV USING A RIGHT ANGLE CONNECTOR 
(SUPPLIED) MOUNTED ON THE BACK OF THE MEMORY 
BOARD 

• MEMORY BOARD EDGE CONNECTOR PLUGS INTO THE 
6800 S 44 BUS, 

. CONNECTS TO PET OR KIM USING AN ADAPTOR CABLE. 

• RELIABLE-DYNAMIC RAM WITH ON BOARD INVISIBLE 
REFRESH-LOOKS LIKE STATIC MEMORY BUT AT 
LOWER COST AND A FRACTION OF THE POWER 
REQUIRED FOR STATIC BOARDS. 

• USES 'SV ONLY. SUPPLIED FROM HOST COMPUTER. 

• FULL DOCUMENTATION. ASSEMBLED AND TESTED 
BOARDS ARE GUARANTEED FOR ONE YEAR AND 
PURCHASE PRICE IS FULLY REFUNDABLE IF BOARD IS 
RETURNED UNDAMAGED WITHIN 14 DAYS. 

ASSEMBLED WITH 32K RAM J395.00 

» WITH 16K RAM J339.00 

TESTED WITHOUT RAM CHIPS J279.00 

HARD TO GET PARTS (NO RAM CHIPS) 

WITH BOARD AND MANUAL $109.00 

aARE BOARD S MANUAL $49.00 



U.S. PRICES ONLY 



16K MEMORY 
EXPANSION KIT 



ONLY 



$58 



FOR APPLE, TRS-80 KEYBOARD, 
EXIDY, AND ALL OTHER 16K 
DYNAMIC SYSTEMS USING 
MK4116-3 OR EQUIVALENT 
DEVICES. 

• 200 NSEC ACCESS, 375 NSEC 
CYCLE 

• BURNED-IN AND FULLY 
TESTED 

• 1 VR. PARTS REPLACEMENT 
GUARANTEE 

• QTY. DISCOUNTS AVAILABLE 



ALL ASSEMBLED BOARDS AND 
MEMORY CHIPS CARRY A FULL ONE 
YEAR REPLACEMENT WARRANTY 



-r f=i 

COlTlPUTeR CfVrCFS 

I230 UJ.COlimi AVE. 

ORflnce, CO 92668 

(714)633 7280 
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The time has come for computers 
to talk and listen 




Introducing COGNIVOX series VIO, 
the affordable voice I/O peripherals 

PET or AIM-65 

Speech Recognition and Voice Response need no longer mean esoteric 
concepts and expensive fiardware. COGNIVOX series VIO is a family of 
voice input and output peripherals for personal computers that are easy to 
use and have excellent software support. COGNIVOX can be trained to 
recognize words or short phrases from a vocabulary of up to 32 words of 
your choice with an accuracy of up to 98% and it will talk back with up to 32 
different words. It can also play music and create sound effects. 
COGNIVOX requires at least 16K of RAIvl In your computer. If your 
computer has less memory or if you are only interested in recognition, ask 
us about our SR-1 00 series of voice input peripherals. COGNIVOX series 
VIO comes complete with microphone, amplifier and speaker, cassette 
with software and extensive manual. It costs only $149 (add $5 for shipp. 
and handl. in US, 1 0% of order overseas. CA res. add 6% tax). Has 
immediate delivery and 120 day limited warranty. Write for more 
information giving us the make and model of your computer. 

Dept.M, P.O. Box 388 
Goleta, CA 93116 . 



VOiCETEK 



'^ ' 

Y^ = gfytsu/eeirsfiuil PET Products 
' from 

OPTmiZED DATA SYSTEHISl 

-SOFTWARE FOR ALL PET/CBMs- 
(Supplied on Cassette-Prices include Shipping) 

• WORD PROCESSOR (PS-001) S16.95 

Makes documents a snap ».„ „_ 

• MAILING LIST (PS-002) $16-9S 

Throw away your address book 

• SPACE EATER (PS-003) *9-95 

Gobbles spaces in BASIC programs .,, „ 

• CATALOG (PS-004) »1o-95 

File stamp/coin/etc. collections 

• SATELLITE TRACKER (PS-005) $24.95 

Tracks OSCAR Ham Satellite in real time 

• MORSE CODE KEYER (PS-0061 S14-95 

J^ Sends code on the air or for practice ,.,.__,. 

ji?« MINI-COUNT^ " (PS-007) S19-95 

Measures frequency to 17KHz and intervals to 65 msec 

-HARDWARE FOR "OLD" 8K PETS- 
(Shlpplng Additional) 

• 2114 RAM ADAPTER (+ $1 .50 per order) 

Replaces up to 8-6550s with low cost, reliable 2114s 



PHK-001 (Kit-2 sockets) . . . .$13.95 
PHK-001S (Kit-8 sockets) . . .$16.25 






PHB-OOI (Bare PCBI . . . .$8.95 
PH-001S (Assm-sockets 

only) $22.95 

PH-001 (Asjm-2 sockets + one 2114) $24.95 

4K MEMORY EXPANSION (+ $3 per order) 

Installs easily internally. Uses 2114s. Write Protect. 



PHB-002 (Bare PCB) . . 

PH-002S (Assm-sockets 

only) 



.$16 
.$42 



PHK-002 (Kit-sockets only) $29 

PH-002 (Full Assm) $105 



PROMPT SHIPMENT! 
Calif. Residents, add 6% Tax 

P.O. Box 595, Dept. M 



SATISFACTION GUARANTEED 
- Placentia, California 92670 



MINI-COUNT Trademark of Optimi««d Data Systems 
PET/CBM Trademark o* Commodore Business Machines 




Skylcs Electric Works 

231 E South Whisman Road 
Mountain View, CA 94041 



PET and APPLE II Users 
PASCAL 

ABACUS Software makes available its version of TINY PASCAL for 
the users of two of the most popular personal computers. 

TINY PASCAL is a subset of the standard PASCAL as defined by 
Jensen and Wirth. It includes the structured programming 
features: IF-THEN-ELSE, REPEAT-UNTIL, FOR TO/DOWN TO-DO, 
WHILE-DO, CASE-OF-ELSE, FUNC and PROC. Now you can learn the 
language that is slated to become the successor to BASIC. 

TINY PASCAL is a complete package that allows you to create, 
compile and execute progams written in the PASCAL language. 
You can save source and object code on diskette or cassette (PET 
version only). Comprehensive user's manual included. The manual 
can be examined for $10 (refundable with software order). 

REQUIREMENTS 

PET 16K/32K New ROMS cassette 
PET 16K/32K New ROMS diskette 
Apple II 32K Applesoft ROM w/DOS 
Apple II 48K Applesoft RAM w/DOS 
TINY PASCAL User's Manual 
6502 Interpreter Listing 

FREE postage in U.S. and CANADA 
All orders prepaid or COD 




ffrnf mni 



mnni 



ABACUS SOFTWARE 

P. 0. Box 7211 
Gran(d Rapi<Js, Michigan 



49510 
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Having Trouble Finding 
KIIVI & AIIVI Software? 



LOOK NO MORE! 

MICRO sells software packages that may be 
just what you have been searching for! 

All products come complete with full 
user/operator Instructions, a cassette tape 
and, with the exception of MICROADE, a 
complete set of source listings. 



KIM 

KIM Microchess 
HELP Mailing List 
HELP Info Retrieval 
MICROADE 

AIM 

Microchess 



CASSETTES/ 
MANUALS 

$15.00 
15.00 
15.00 
25.00 

15.00 



To place your order, write or call: 



MICRO 

P.O. Box 6502 

Chelmsford, MA 08124 

(617) 256-5515 

Dealer Inquiries Invited 



• 

• 

• 
• 

• 

• 

• 

• 
• 

• 
• 
• 

• 



M 



M 



M 



M 



END FRUSTRA TIONH 



FROM CASSETTE FAILURES 
PERRY PERIPHERALS HAS 
THE HDE SOLUTION 
OMNIDISK SYSTEMS (5" and 8") 

ACCLAIMED HDE SOFTWARE 

• Assembler, Dynamic Debugging Tool, 
Text Output Processor. Comprehensive 
Memory Test 

• Coming Soon— HDE BASIC 

PERRY PERIPHERALS S-100 PACKAGE 

Adds Omnidisk (5") to 
Your KIM/S-100 System 

• Construction Manual— No Parts 
» FODS & TED Diskette 

i $20. -(-$2. postage& handling. (ny residents 

add 7% tax) (specify for 1 or 2 drive system) 

Place your order with: 
PERRY PERIPHERALS 

P.O. Box 924 
Miller Place, N.Y. 11 764 
(516)744-6462 

Your Full-Line HDE Distributor/Exporter 







* • ••••••••••••••*•••••••• 



Compare Our Prices With Any Others 



Rockwell's 
Synertek's 
Commodore's 



AIM-65 

SYM-1 

KIM-1 



IK System: 
IK System: 
IK System: 



$405. 
235. 
175. 



4K System 
4K System 



$459. 
259. 



The Computerlst, Inc's: 

16K DRAM 

32K DRAM 

Video Plus II 

Mother Plus II & Card Cage 



FOR YOUR SYSTEM'S EXPANSION 

$279. Proto Plus II 

375. ASK I/O Board 

279. DRAM & Video Cable 

115. Power Supply for SYM-1 



$42. 
55. 
15. 
39. 



Power Supply and Enclosure for AIM-65 $119. 

Power Supply and Enclosure for KIM-1 65. 

All products are factory warrantled. Prices Include full documentation. 

Send Check or Money Order to: 

Hepburn MCA* 

12 Grosvenor Street 

Lowell, MA 01851 

Please add $5.00 shipping and handling. MA residents add 5% sales tax. 
* Mini Computers and Accessories 
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AIM 65 
File Operations 



This, the third part of a series, 
builds upon previous articles to 
arrive at an AIM 65 text file 
processing system with BASIC. 



Christopher J. Flynn 
2601 Claxton Drive 
Herndon, Virginia 22070 



In two previous articles (26:61) and 
(30:65), we described text file input and 
output subroutines. These subroutines, 
when used with BASIC, added signifi- 
cant file handling capabilities to the 
AIM 65. We will now take these 
capabilities a step further, showing 
how BASIC can make effective use of 
the AIM 65 's built-in dual cassette in- 
terface. We will remove our earlier 
restriction on the concunent use of in- 
put and output files. The result, then, 
will be a general-purpose file system for 
processing AIM 65 text files with 
BASIC. 

AIM 65 Hardware 

The term "dual cassette interface" 
may be a little misleading to some. The 
AIM 65 has, in fact, one audio input 
chaimel, one audio output channel, and 
two motor control circuits. 

Now, to use two tape recorders with 
the AIM 65, we dedicate one of them as 
a playback-only drive and the other as a 
record-only drive. In our system, we 
use drive 1 for playback and drive 2 for 
recording. The motor control circuits 
are connected to the appropriate tape 
recorder via the recorder's remote jack. 

The record, playback, rewind, and 
fast-forward levers must still be 
depressed by hand, of course. Never- 
theless, once the read and write opera- 
tions are started, the AIM 65 will take 
full control over both recorders. The 
AIM 65 will start and stop each 
recorder at the proper time. (Incidental- 
ly, to see your AIM 65 BASIC program 
doing this will really impress you.) 



AIM 65 Software 

As we mentioned in our first article, 
(26:61) AIM 65 tape I/O is buffered. 
That is, when a character is to be read 
from, or written to, a tape file, the 
character is actually read from, or writ- 
ten to, a dedicated area of RAM. This 
dedicated RAM is known as a buffer. 
Only when all the data has been read 
from a buffer, or when the buffer has 
been filled with data, does the AIM 65 
start up a tape recorder to do the actual 
read or write. 

There is a buffer pointer associated 
with a buffer. The butfer pointer is used 
by the AIM 65 to keep track of the data 
within the buffer. Normally, the AIM 
65 uses a single buffer which is located 
in page 1 at $0116. Tltiis is the source of 
our restriction which stated that an in- 
put file and an output file could not be 
open at the same time. 

Let's see what wovdd happen if we 
violated this restriction. Suppose our 
program were doing a read, and then a 
write. The very first read would fill the 
tape buffer with data and set the buffer 
pointer. The write operation would 
then store data in the buffer. This 
would destroy some or all of the input 
data. That is not all. The write would 
also change the contents of the buffer 
pointer. So, when tbie program did the 
next read, there would be strange data 
in the btiJEfer and a pointer pointing to 
who-knows-where. The result: chaos. 

The designers of the AIM 65 
anticipated these problems. They pro- 
vided for a second tape buffer which is 
located in page at $0OAD. This 
second buffer is activated automatical- 
ly if the AIM 65 detects that the active 
input device (INFLG) and the active 
output device (OUTFLG) are both tape 
recorders. 

Unfortunately, this feature of the 
AIM 65 will not work for us with 
BASIC. First of all, the second tape buf- 
fer, being in page zero, will obliterate 



BASIC'S page zero variables. This 
would also cause chaos. Secondly, our 
text file input and output subroutines 
set INFLG and OUTFLG for tape opera- 
tions only long enough to read or write 
a record. Thus, both INFLG and 
OUTFLG will probably not be set for 
tape at the same time. In the sections 
that follow, we will present one solu- 
tion to the tape buffer problem. (You 
may come up with other solutions.) 



Synchronization Bytes 

Each AIM 65 tape data block is 
preceded by a series of synchronization 
bytes. The contents of a RAM variable 
called GAP determine the number of 
synchronization bytes written. GAP is 
initialized by the AIM 65 to a value of 
$08. The AIM 65 manuals recommend, 
however, that GAP be manually set to 
$80 when the tape recorder is going to 
be used in a start-stop mode such as 
when loading a BASIC program. Experi- 
ment with the setting for GAP. A 
smaller value will result in faster read 
and write times. Don't set GAP too 
small, however, or the tape will 
become unreadable. We have found 
that a value of $20 works perfectly for 
three different tape recorders. 

If you are willing to do a little 
surgery on your tape recorder, you may 
be able to achieve even faster perfor- 
mance. We modified a Radio Shack 
CTR-40B so that its electronics would 
remain on, even when the motor was 
tvimed off. We now get good start-stop 
results with the default value of 
GAP— $08. By the way, this modifica- 
tion changed the motor type from a 
type IV to a type HI. 

Using Dual Cassettes 

With the proper software, the AIM 
65 is fully capable of dual cassette 
operations with BASIC. We will use 
our text file input and output 
subroutines, plus additional software 
which is described later. 
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of course, the first step to take is to 
connect two tape recorders to your AIM 
65. Dedicate one of them as an input 
drive and the other as an output drive. 
(It doesn't matter which is which, but 
we use drive 1 for input and drive 2 for 
output.) Test each recorder thoroughly. 
Make absolutely sure that the motor 
control circuits are working. Experi- 
ment a bit and find the best value of 
GAP for your system. You should now 
be assured of obtaining reliable tape 
operations. 

Standard Motot Control 

When we designed the text file in- 
put and output subroutines, we made 
some decisions as to when to turn a 
given tape recorder on or off. In addi- 
tion, the AIM 65 itself toggles the 
recorders at certain times. We have 
summarized the times when the tape 
recorders are turned on and off. 



Read Operation 

Reading a block: 

Between blocks: 
End of file: 



Write Operation 

Writing a block: 

Between blocks: 
End of file: 



only the input tape 
recorder is turned 



on 



both tape recorders 
are turned off 
only the input tape 
recorder is turned 



on 



only the output tape 

recorder is turned 

on 

both tape recorders 

are turned off 

both tape recorders 

are turned on 



In most cases, this is a fairly conve- 
nient way to control the tape recorders. 
For example, reads and writes can easi- 
ly be alternated. 

For ease of operation, there are two 
guidelines to follow: 

1. Position both the input and output 
tapes before you begin processing. 

2. Do not close an output file until you 
have finished all input and output 
processing. 

Let's examine these guidelines. 
Suppose we are going to read a tape and 
then write some of the data to an out- 
put tape. As soon as we read the very 
first block of data from the input tape 
recorder, the output tape recorder will 
be turned off. If we haven't already 
positioned the tape, we would have to 
remove the plug from the recorder's 
remote jack to do so. 













F/gor» 1 




7D41 AD 


3F 


7D 




LDA 


INBFPT 


MOVE INPUT BUF PNTR 


7D44 80 


36 


A4 




STA 


TAPIR 


TO AIM BUF PNTR 


7D47 A2 


4F 






LDX 


#J4F 




7D49 BD 


8D 


7D 


LBLA 


LDA 


INBLIFR, 


X MOVE 80 BYTES 


7D4C 9D 


16 


01 




STA 


FORMA, X 


TO AIM BUFFER 


7D4F CA 








DEX 






7D50 10 


F7 






BPL 


LBLA 




7D52 20 


00 


7C 




JSR 


TEXT IN 


CALL TEXT INPUT SUBR 


7D55 AD 


36 


A4 




LDA 


TAPTR 


MOVE AIM BUF PNTR 


7D58 8D 


3F 


70 




STA 


INBFPT 


TO INPUT BUF PNTR 


7D5B A2 


4F 






LDX 


#$4F 




7D5D BD 


16 


01 


LBLB 


LDA 


FORMA, X 


MOVE 80 BYTE AIM BUF 


7D60 9D 


8D 


7D 




STA 


INBUFR, 


K TO INPUT BUF 


7D63 CA 








DEX 






7D64 10 


F7 






BPL 


LBLB 




7D66 60 








RTS 






7D67 AD 


40 


7D 




LDA 


OUBFPT 


OUTPUT BUFF. PTR. 


7D6A BD 


36 


A4 




STA 


TAPTR 


TO AIM BUFF. PTR. 


7D6D A2 


4F 






LDX 


#$4F 




7D6F BD 


DD 


7D 


LBLC 


LDA 


OUTBFR.X 80 BYTE OUTP . BUFF. | 


7D72 9D 


16 


01 




STA 


FORMA, X 


TO AIM BUFFER 


7D75 CA 








DEX 






7D76 10 


F7 






BPL 


LBLC 




7D78 20 


A4 


7C 




JSR 


TXTOUT 


CALL TEXT OUTP. SUBR. 


7D7B AD 


36 


A4 




LDA 


TAPTR 


MOVE AIM BUFF. PTR. 


7D7E 8D 


40 


7D 




STA 


OUBFPT 


TO OUTP. BUFF. PTR. 


7D81 A2 


4F 






LDX 


iif$4F 




7D83 BD 


16 


01 


LBLD 


LDA 


FORMA, X 


MOVE 80 BYTE AIM BUFF. 


7D86 9D 


DD 


7D 




STA 


0UTBFR,X TO OUTPUT BUFFER | 


7D89 CA 








DEX 






7D8A 10 


F7 






BPL 


LBLD 




7D8C 60 








RTS 







In the second case, suppose that we 
had wanted to read some more data 
from the input tape, even though we 
had finished writing the output tape. 
As soon as we close the output file, 
both tape recorders would be turned on 
(the monitor routine DUll does this). 
By the time we get; around to reading 
the next block, we would have found 
that the tape had already started. There 
is a good chance then of misreading one 
or more blocks. 



Conttolling the Motors with 
BASIC 

You can also control the tape 
recorders with BASIC. Bits 4 and 5 of 
AIM 65 port B (at $.A.800 or 43008) are 
used to toggle the motor control cir- 
cuits. Bit 4 controls drive 1, and bit 5 
controls drive 2. A one in the proper bit 
will turn a motor on, while a zero will 
turn the motor off. 



With the use oi' PEEK and POKE 
statements, BASIC can access port B 
and set the appropriate bits. The chart 
below shows the code to do this. 



To turn a motor on: 

POKE 43008,(PEEK(43008) or K) 

Action K 

Turn drive Ion 16 

Turn drive 2 on 32 

Timi both drives on 48 

To turn a motor off: 

POKE 43008,(PEEK(430G8) and K) 



Action 


K 


Turn drive 1 off 


239 


Turn drive 2 off 


223 


Turn both drives off 


207 



Naturally, you should be careful 
about controlling the motors this way. 
If a motor is turned on while you are in 
the middle of processing a file, you can 
imagine the kind of errors that could 
result. A good rule of thumb is to use 
the standard motor control options 
whenever possible. Resort to BASIC 
only when you need to— to turn both 
drives on after an I/O error for 
example. 

Compatibility with Input and 
Output Subroutines 

Our AIM 65 text file input and out- 
put subroutines were designed to be in- 
corporated into a dual cassette file 
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Figure 2 

10 HEM RESUHBEE PEOGEAM 

20 EEH OPEK INPUT FILE 

30 POKE 245,0: EEM $F5 

40 EEH OPEK OUTPUT FILE 

50 POKE 247,0: EEM $F7 

60 INPUT "STABTING LINE"; SI 

70 INPUT" IKCEEMENT"; INC 

80 EEM INITIALIZE LINE NUMBEE 

90 LN - SL 

100 EEM EEAE A LINE OF BASIC TEXT 

110 A$-"" 

120 FOR 1-1 TO 80 

130 A$-A$+"*" 

140 NEXT I 

150 POKE 4,65:EEM $41 

160 POKE 5,125:REM $7D 

170 L-USE(O) 

180 REM EEEOE TEST 

190 IF L<0 THEN STOP 

200 EEM END FILE TEST 

210 IF L-0 THEN 370 

220 EEM GET LENGTH OF OEIGIHAL LINE # 

230 A$-LEFT$(A$,,L) 

240 LL-LEN(STE$(VAL(A$))) 

250 REM PUT IN THE NEW LINE # 

260 A$-STR$(LN)+MID$(A$,LL+1) 

270 LN-LN+INC 

280 EH! OUTPUT THE LINE 

290 POKE 4, 103: REM $67 

300 POKE 5,125:REM $7D 

310 Z-USR(LEN(A$)) 

320 REM ERROR TEST 

330 IF Z<0 THEN STOP 

340 mm DO THE NEXT LINE 

350 GOTO 100 

360 REM CLOSE THE OUTPUT FILE 

370 A$-CHE$(26):EEM CONTEOL Z 

380 POKE 4, 103: EEM $67 

390 POKE 5,125:EEM $7D 

400 Z-USR(1):EEM OUTPUT CONTEOL Z 

410 Z-USE(0):EEM CLOSE THE FILE 

420 PRINT"»*»DONE<"»*" 

430 END 



Figures 

10 REM DEMO PROGRAM FOR BASIC RENUMBER 

15 FOE 1-1 TO 10 

16 PRINT I; 

17 PRINT SQR(I) 
20 NEXT I 

25 REM GOTOS AND GOSUBS ARE NOT EENUMBEEED 

30 GOSUB 100 

35 GOTO 15 

100 EEM A SUBEOUTINE 

105 LET C-C+1 

110 PRINT C 

115 RETURN 

This is' the program after renumbering. 
1 20 REM DEMO PEOGEAM FOE BASIC EENUMBEE 
160 PEIHT I; 
180 PEINT SQR(I) 
200 NEXT I 

220 EEM GOTOS AND GOSUBS AEE NOT RENUMBERED 
240 GOSUB 100 
260 GOTO 15 
280 REM A SUBEOUTINE 
300 LET C-C+1 
320 PRINT C 
340 RETURN 



system. They both use the variable A$ 
for holding a record. When a record is 
read, the input subroutine tells you 
how many bytes of data were actually 
stored in A$. When you write a record, 
you tell the output subroutine how 
many bytes from A$ to write. Now, to 
read a record and to write it back to 
tape, all we have to do in BASIC is: 

POKE 4, low address of input 

subroutine 
POKE 5, high address of input 

subroutine 
L = USR(0): REM READ A 

RECORD INTO A$ 
POKE 4, low address of output 

subroutine 
POKE 5, high address of output 

subroutine 
Z = USR(L): REM WRITE A 

RECORD FROM A$ 

Thus, dual cassette input and output 
becomes very easy. 

Buffer Management 

Before we can begin actually using 
the dual cassette interface with BASIC, 
we need to overcome the AIM 65 's 
single buffer problem. The approach we 
are taking is a brute force method. It 
does have the virtue, however, of being 
very simple. We call this simple soft- 
ware a buffer manager. 

We will proceed by setting up our 
own input buffer and pointer, and our 
own output buffer and pointer. Each 
buffer will be 80 bytes long— the same 
as the AIM 65 's. Whenever we request 
an input or output operation, the buffer 
manager will do the following: 

1. Move our buffer and pointer to the 
AIM 65 's buffer and pointer 

2. Perform the read or write operation 

3. Move the AIM 65 's buffer and 
pointer back to our buffer and 
pointer. 

Although there is a lot of data flying 
back and forth in RAM, the buffer 
manager keeps everything straight. It 
allows us to have an input and an out- 
put file open at the same time. 



Loading the Buffer Manager 

The code for the buffer manager is 
shown in AIM 65 instruction format in 
figure 1 . A hex dump is not included, 
due to the degree of customization that 
will be required for your system. 
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There are two routines shown in 
figure 1. One handles text file input and 
the other text file output. These 
routines will now become the main en- 
try points for all I/O operations. This 
means that whenever you want to read 
or write text files, your BASIC program 
should call the appropriate buffer 
manager and not the input or output 
subroutines themselves. 

To load the buffer manager in your 
system, you need to do the following: 

1. Set aside four areas of RAM for a 
total of 162 bytes. 

Length 

1 

1 

80 

80 



Area 

Input buffer pointer 
Ouput buffer pointer 
Input buffer area 
Output buffer area 



2. Modify the code shown in figure 1 
to use the pointer and buffer ad- 
dresses which you have just 
established. 

3. Make sure that the buffer manager's 
references to the text file input and 
output subroutines are correct. 

Once you are satisfied that everything 
is correct, be sure to save the programs 
on tape. 



The total memory requirements to 
support full dual cassette operations 
now become: 



Text file input subroutine 
Text file output subroutine 
Buffer manager code 
Buffer manager RAM 

TOTAL 



164 

148 

76 

162 

550 



Use this figure when responding to 
BASIC'S MEMORY SIZE prompt. If you 
have a 4K AIM 65, you would respond 
with 3546 (4096 minus 550). 

Do not let the 550 byte memory re- 
quirement worry you. There is still 
room left for a pretty good size BASIC 
program. Also, since you now have 
dual cassette capabilities, you can work 
on files that are larger than the 
available RAM in your system! 



Sample Progiam 

Our sample program is a very sim- 
ple BASIC renumber program. It only 
renumbers the lines. It will not update 
GOTOs and GOSUBs. They will have 
to be corrected manually. 



The listing for the renumber pro- 
gram is shown in figure 2. We have in- 
cluded a sample run in figure 3. If 
you've got everything working proper- 
ly, you should be able to get exactly the 
same results that we did. To use the 
renumber program, follow this step-by- 
step procedure. 

1. Save the program you wish to 
renumber on tape. 

2. Make sure that you've loaded the 
machine language programs and 
that BASIC is initialized 
accordingly. 

3. Key in or LOAD the renumber 
program. 

4. Put the tape containing the pro- 
gram to be renumbered in the in- 
put tape recorder. 

5. Place a blank tape in the output 
tape recorder. 

6. Space the blank tape to a point past 
the leader. 

7. Type RUN to begin the renum- 
bering. 

8. You will be asked for a new 
starting line number and incre- 
ment. Respond with the desired 
numbers. 

9. You will be asked for the input 
device, file name, and tape drive 
number. Respond appropriately. 

10. You will be asked for the output 
device, file name, and tape drive 
number. Respond appropriately. 

11. Sit back and watch the blocks of 
data being read, processed, and 
written. 

12. Rewind both tapes when the 
renumber program is done. 

13. Load the renumbered program. 

14. Correct any GOTOs and GOSUBs. 

The operation of the renumber pro- 
gram is very simple. It works by 
reading one line of the original program 
at a time. It then strips off the line 
number and replaces it with a new line 
number. Finally, it writes out the 
modified line to the output tape 
recorder. 

You may want to expand this sim- 
ple renumljer program into a full 
renumber program that fixes GOTOs 



and GOSUBs automatically. To do 
this, you will probably need to read the 
original program twice. The first time 
around, renumber the lines as we have 
already done. At the same time, build 
an array of old line numbers and the 
corresponding new line numbers. The 
second time that you read the tape, test 
each line for a GOTO or GOSUB. If one 
is present, you can find out what the 
new destination should be by referring 
to the table that you built the first time 
around. (This, of course, is not the best 
way to renumber BASIC programs. It 
is, however, a pretty good way to 
become familiar with file operations in 
BASIC.) 

The program in figure 2 is 
straighforward. We followed all the 
procedures described in earlier articles 
for text file input and output. The only 
difference is that our POKEs to loca- 
tions 4 and 5 set up references to the 
buffer managers and not to the text file 
I/O routines. One thing to remember is 
that you must always write a control-z 
to the end of any text file that you plan 
on LOADing with BASIC. 

Conclusion 

This series of articles has described 
a way to make your AIM 65 a powerful 
data processor. We began by describing 
a way to read AIM 65 text files with 
BASIC. Next we added the capability to 
write text files. Finally, we combined 
these components into an integrated 
dual cassette system. 

With the expenditure of 550 bytes 
of RAM and two tape recorders, your 
AIM 65 has almost all the capabilities 
of a floppy disk-equipped system. 
While we do not have the ability to do 
random access, we have practically 
vmlimited storage capabilities. AIM 65 
cassette I/O is fairly fast and the dual 
cassette interface really works! 

There are many applications that 
are now opened up. For example, we 
have set up a home accounting system 
that compares expenditures against a 
budget. Let us hear about your 
applications. 



Christopher Flynn has an AIM with 32K of 
RAM and a Model 33 teletype for hardcopy 
output. His software interests include 
Assembly language and BASIC. To support 
his hobby, Chris is employed by the 
Fairfax County government as a systems 
analyst for the county's tax systems. 
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7sf-M4TE™ 

IS THE ULTI-M4 TE EXPANSION 
FOR YOUR PET 

Adds 16to28KRAM 

Supports additional 16K EPROM/ROM with programmable address selection 
circuitry-Permits up to six 4K memory segments to share a single 4K address 

Programs EPROMs on board 

Adds 32 additional I/O lines, 4 timers, and 2 shift registers 

Adds customization area 

Uses existing or external housing and power 

Includes circuitry to support an externally mounted reset switch 
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RAM 
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DISPLAY RAM 
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EPROM/ROM 
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WORD PRO II 



TOOL KIT 



DISK-O-PRO 



OTHER 



PROGRAMMABLE 

ADDRESS 

CONTROLLER 



Ist-MATE 



Thousands of our expansion boards for the AIM, SYM, and KIM are in use In Industrial, scientific, university, 
and business environments. 1st-MATE is the first of a line of multifunction expansion boards and accessory 
products planned to supplement and extend the capabilities of the PET/CBM microcomputers. Ist-MATE 
has evolved from the popular DRAM PLUS currently being used with the AIM, SYM, and KIM. It has been 
customized to provide special support and features for the PET. 

Ist-MATE was first demonstrated at Commodore Business Machines' Philadelphia area Equipment 
Systems Show, December 13-14, 1980. 

1st-MATE is available for demonstration and immediate delivery from local computer stores carrying 
COM products. 

TCB 110-16 Ist-MATE, 16K Ry\M, with cable $395.00 

TCB 11 0-28 Ist-MATE, 28K RAM, with cable 475.00 

Prices quoted US — does not include stiipping & handling. 

To obtain the name and location of your nearest dealer call or write: 

34 Chelmsford St., Ctt»lmaford, UA 01824 
m7/2S6-3049 
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Dr. DoBB'S ToURNALof 

COMPUTER 



V_>alisth 



enics 



6 



thodontia 



Running Light Without Overbyte 



Twelve Times Per Year 



$21/1 Year -$39/2 Years 
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Recent issues have included: 

ZX65: Simulating a Micro 
EXOS-6500 Software Development Tool Kit 
6502 Assembler-Pet 8K-32K 
A Note on 6502 Indirect Addressing 
The C Programming Language 

What you see is what you get. 



To subscribe, send your name and address to Dr. Dobb's Journal, 
Department V4, Post Office Box E, Menlo Park, CA 94025. 

We'll bill you. 
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Atari 



Real 



Time 



This is a program which allows 
drawing In graphics mode by 
moving the cursor, with the 
keyboard, In any direction 
desired. This program also 
permits the usage of several 
different colors. 



Charley and Mary Kozarski 

1035 Fuller NE 

Grand Rapids, Michigan 49503 



Here is a progiam which allows draw- 
ing in graphics modes 3 through 8, us- 
ing the keyboard alone. This is design- 
ed for Atari 800 or 400 owners who 
primarily use their computers for other 
than games. It's great for those who 
don't have joysticks but would like to 
doodle in graphics mode occasionally. 



Controlling real-time graphics with 
the keyboard can be accomplished by 
using an IF... THEN statement in 
association with William Colsher's 
famous PEEK (764) command. Lines 
45-85 look for a certain key to be 
pressed and if it is, then the graphics 
plot is moved one line in that particular 
direction. 

Line 10 sets the maximum plot 
dimensions for that graphics mode. 
The GOSUB routine is used to keep the 
plot on the screen. V/ithout it, moving 
the plot beyond the maximum limit for 
that mode would cause an ERROR 141 
(cursor out of range). Also, at this time, 
the computer wovdd kick out of 
graphics mode and you'd have to start 
your drawing from the beginning! 

It is possible to change the color of 
the plot at any time without changing 
what has already been plotted. This can 
be done by lines 35 and 45. Also, line 



25 allows the present plot position to 
be indicated by blinking the cursor on 
and off. 

One last thing worth mention- 
ing — one of the plot colors is black or 
background color, which allows you to 
erase anything you have already drawn. 

We Atari owners would appreciate 
it if the rest of you Atari fans out there 
would start sending in programs and in- 
formation that you think would be 
interesting or fun. 



Charles Kozarski works as an Electronics 
Technician for a large retailer. Computers 
have always fascinated him and he decided 
to explore them as a hobby. He owns an 
Atari 800 and spends a great deal of time 
developing programs. 

Mary Kozarski is an underwriter for an 
insurance agency. 



5 GRAPHICS 5+l6:X-40:y=24:C=1 
10 XMAX=80:YMAX=48:EEM-PL0T LIMITS 
15 POKE 764,255:EEM-CLEAE LAST KEY 
20 REM (25) -BLINKS PRESENT PLOT POINT 
25 COLOR 0:IF C=4 THEN COLOR 2 
30 PLOT X.YiFOR Ii=1 TO 50: NEXT C 
35 COLOR C: PLOT X,Y: REM-SET COLOR 
40 REM (45) -SET PLOT DIRECTIONS TO KEYS 
45 IF PEEK (764)=18 THEN C=C+1: IF C>4 THEN C=l 
50 IF PEEK (764;=6 THEN X=X-1 : GOSUB 95 
55 IF PEEK (764)-7 THEN X-X+1 : 
60 IF PEEK (764)" 14 THEN Y-Y-1 
65 IF PEEK (764)=15 THEN Y=Y+1 
70 IF PEEK (764)-48 THEN X=X-1 :Y=Y-1 
75 IF PEEK (764)=50 THEN X=X+1 :Y-Y-1 
80 IF PEEK (764)=54 THEN X=X-1 :Y=Y+1 
85 IF PEEK (764)«55 THEN X^X+I :Y=Y+1 
90 GOTO 15 
95 EEM=SET PLOT LIMITS! 

100 IF X>=XMAX THEN X=0 

105 IF Y>=YMAX THEN Y=0 

110 IF X<0 THEN X=XMAX-1 

115 IF Y<0 THEN Y=YMAX-1 

120 RETURN 



KEY 



GOSUB 95 

! GOSUB 95 

: GOSUB 95 

GOSUB 95 
GOSUB 95 
GOSUB 95 
GOSUB 95 
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= Move Plot Up 

= Move Plot Down 

= Move Plot Left 

= Move Plot Right 

= Change Plot Color 

= Move Plot Up 
Diagonal Left 

= Move Plot Up 
Diagonal Right 

= Move Plot Down 
Diagonal Left 

= Move Plot Down 
Diagonal Right 
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New Publications 



Mike Rowe 
New Publications 
P.O. Box 6502 
Chelmsford, MA 01824 



This column lists new publications 
received for review and also reports on 
pertinent publication announcements 
received from book and periodical 
publishers. Some works mentioned 
here may be reviewed by MICRO at a 
later date. 

Ohio Scientific 

Introductory works from Elcomp 
Publishing, Inc. (3873L Schaefer 
Avenue, Chino, California 91710), 
both by J. Clothier and W. Adams, have 
confusing titles and have been pro- 
moted in a confusing way: The First 
Book of Ohio Scientific Vol. I 
(publisher's order no. 157) and The 
Second Book of Ohio Scientific (order 
no. 158). The first book carries an an- 
nouncement for the second book (order 
no. 158) under the title The First Book 
of Ohio Scientific, Vol. II. Both books 
are largely compilations of material 
issued in various formats by the 
manufacturer or previously published 
elsewhere. Here are brief descriptions: 

The first book (paperboxmd, 188 pages, 
$7.95) covers the Challenger IP and IP 
MF, the Superboard 11, the Challenger 
4P and 4P MF, the Challenger 8P and 
8P DF, peripherals, software, and other 
introductory information. 

The second book (paperbound, 188 
pages, $7.95) covers the OS-65 (version 
2.0 disk operating system, microcom- 
puter operating system, string 
variables, machine code, and the 
editor); the wordprocessor WP-2; I/O 
drivers; memory test program; and 
various other hardware and software 
data. 

PET 

PRINTOUT, a magazine for users of 
PET and Commodore systems, 
published ten times a year in the 
United Kingdom, is now offered to 
readers in the U.S. It covers hardware, 



reviews software, contains articles on 
programming and applications, and 
publishes photos and listings. A sample 
issue is available postpaid for US$3.00 
and a subscription for US$36.00 from 
PRINTOUT, P.O. Box 48, Newbury, 
Berkshire RG16 OBD, England. 



General 6502 

6502 Applications Book by Rodnay 
Zaks. 6502 Series, Volume m, Sybex 
(2344 Sixth Street, Berkeley, California 
94710), 1979, 278 pages plus ad- 
vertisements, over 200 illustrations, 
SVi X 8Vi, paperbovmd. 
ISBN: 0-89588-015-6 $12.95 

Covers application techniques for the 
6502. The book assumes an elementary 
knowledge of microprocessor program- 
ming on the level of the series' 
preceding volume, Piogiaxaming the 
6502. 

CONTENTS: Introduction. The Input Out- 
put CAips— Introduction; Basic Definitions; 
The 6502 PIA; The 6522; Programming the 
6522; The 6530 ROM-RAM I/O Timer 
(RRIOT); The 6532; Summary. 6502 
Systems— Introduction; Standard 6502 
System; The KIM-1; The SYM-1; The AIM 
65; Other boards. Basic Techniques— In- 
troduction. Section I, The Techniques: 
Relays; Switches; Speaker; A Morse 
Generator; Time of Day Clock; A Home 
Control Program; A Telephone Dialer. Sec- 
tion II, Combinations of Techniques: 
Introduction; Generating a Siren Sound; 
Sensing an Input Pulse; Pulse Measure- 
ment; A Simple Music Program; KIM Traf- 
fic Control; Learn the Multiplication Table; 
Summary. Industrial and Home Applica- 
tions— Introduction; A Traffic Control 
System; Dot Matriix LED; Displaying 
Switch Values; Tone Generation; Music; A 
Burglar Alarm; DC Motor Control; Analog 
to Digital Conversion |A Heat Sensor); 
Summary. The Peripherals — Introduction; 
Keyboard; Paper Tape Reader or ASCII 
Keyboard; Microprinter; Summary. Conclu- 
sions. Appendix A: A 6S02 Assembler in 
SAS/C— Introduction; General Descrip- 
tion; Using the Assembler; Syntax; 
HP2000FBASIC. Appendix B: Multiplica- 
tion Game: The Program. Appendix C: 
Program Listings. Appendix D: Hexa- 
decimal Conversion Table. Appendix E: 
ASCII Conversion Table. Appendix F: 6502 
Instructions. 



General Microcoiinputer 

Small Business Programs by S. Roberts. 

Elcomp Publishing, Inc. (3873L 

Schaefer Avenue, Chino, California 

91710), 1980, v, 118 pages, 5¥t x 8Vi, 

paperbound. 

ISBN: 3-921682-57-6 $14.90 



Contains 32 brief business programs 
(averaging about 3 pages each) in 
Microsoft BASIC. According to the 
author (who developed them on PET 
2001, CBM 3016, the Ohio Scientific 
Superboard, TRS-80, and the Sharp 
Computer MZ80K), the programs will 
run on any BASIC computer. 



Microcomputers and Physiological 
Simulation by James E. Randall. 
Addison- Wesley Publishing Company, 
Inc.— Advanced Book Program 
(Reading, Massachusetts), 1980, xvi, 
234 pages, paperbound. 
ISBN 0-201-06128-7 $14.50 

An introduction to microcomputers 
and their use in mathematical simula- 
tions of physiological processes. 

CONTENTS: Foreword by Arthur C. 
Guyton. Preface. Introductjon— Mechanical 
Models; Mathematical Models; Analog 
Computers; Digital Computers; Teaching 
by Simulation; References. Microcomputer 
Components— Microprocessors; Semicon- 
ductor Memory; Keyboard; Cathode Ray 
Tube Displays; Mass Storage; Microcom- 
puters; References; Microcomputer 
Periodicals; Manufacturers Cited. 
Operating Systems and Programming 
Languages— Monitors and Operating 
Systems; CP/M; Assemblers; BASIC; Other 
Programming Languages; References; Soft- 
ware Soiurces. Hardware Enhancements for 
Simulation— Graphics; Numerical Pro- 
cessors; References; Manufacturers Cited. 
Representative Microcomputers — TRS-80; 
Apple II; S-100 Bus Microcomputer; 
References. Compartmental Kinetics: A 
First Example— The Hydraulic Model; 
Computed Responses; The BASIC Program; 
References; Chapter Appendix. The Glucose 
Tolerance Test— The Insulin-Glucose 
Interaction Model; The BASIC Program; 
Computed Responses; References; Chapter 
Appendix. Cardiovascular System 
Mechanics— The Functional Relationships; 
Steady-State Solutions; Steady-State Exer- 
cises; Transient Solutions; References; 
Chapter Appendix. Arterial Pulse 
Pressure— The Model; Computed 
Responses; The BASIC Program; 
References; Chapter Appendix. Vector- 
cardiography and the Limb Leads— Com- 
puted responses; The BASIC Program; 
Chapter Appendix. Distortion of 
Waveforms — Computed Responses; Digital 
Filtering; Restoring Distorted Waveforms; 
The BASIC Program; References; Chapter 
Appendix. Axon Action Potentials- 
Formulation in BASIC; Output Displays; 
Properties of Excitation; Computation 
Methods; References; Chapter Appendix. 
Cardiac Action Potentials— Formulation in 
BASIC; Computed Responses; Output 
Display and Computation Methods; 
References; Chapter Appendix. Formatting 
Student Exercises— Turnkey Systems; 
Programming. Index. 
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Full Disassembly Listing on 
Small Systems 



This Is a utility program for the 
small system owner who 
publishes software listings. It 
examines a program in memory 
and lists the program In 
disassembly format, Identifying 
the operands of each op code. 
After printing the op code and 
the associated operands, It 
pauses to allow the operator to 
furnish label names and 
comments. Thus, a "camera* 
ready" listing can be produced 
even though the system doesn't 
have a large memory. 



Ralph Tenny 
P.O. Box 545 
Richardson, Texas 75080 



The Fiist Book of KIM contained 
MINIDIS, by Dan Lewa«. This pro- 
gram allowed the user to scan memory 
and identify any illegal 6502 op codes 
by blinking the KIM display. After I 
converted MINIDIS to drive a printer, I 
discovered that it allowed me to print 
each op code and the conesponding 
operands. However, it would also 
"disassemble" many other bytes and 
identify each according to the type of 
instruction it "ought" to be. After con- 
siderable thought, I began over and pro- 
duced DISEDIT n, which would test for 
possible 6502 illegal op codes and sort 
the legal op codes according to the 
number of operands each uses. After 
each op code/operand combination, 
DISEDIT n would halt to allow the user 
to type labels, mnemonics and com- 
ments in a form to gladden the heart of 
any editor. This program fimctioned on 
an unexpanded KIM, but did not leave 
room for a large program. 



DISEDIT n didn't really disassem- 
ble the code. If it had [typing out ad- 
dresses, code and operands), it would 
also have typed in locations instead of 
labels, and would not [unless modified) 
have allowed for an opportunity to type 
in comments. 

In the process of expanding my 
KIM, it got to be a hassle having both a 
program area and a 7.ero-page look-up 
table, so the program, was modified to 
be fully relocatable and ROMable. I 
will eventually have it in a ROM plug- 
in module. The version shown is 
located at 1200i« and uses the following 
zero-page buffers: 

0000,8 — TEMP; temporary 
storage of op code be- 
ing tested. 

0002,6 — SAL; iow byte of 
starting address of pro- 
gram being ilsted. 

0003,6 — S/iH; high byte of 
start address. 

0004,8 — EAL; low byte of end 
address in auto iist 
mode. 

0005,6 — E/vH; high byte of 
end address. 

0007,6 — TMPY; storage for 
current y-index value. 



Auto list mode is a last-minute ad- 
dition which allows the listing to pro- 
ceed from program start to end, 
without pausing for you to enter the 
labels, etc. This speeds up the debug- 
ging utility of the program con- 
siderably, and allows a quick check on 
accuaracy of program entry when key- 
ing in a new program. To activate the 
auto list mode, simply change two 
locations as follows: 12DDi6 — 08; 
12E3i5 — 02. This modification forces 
the branch to pass up STOPl, and the 
program runs continuously. If you have 
implemented sense switches, as I plan 
to, the program could be modified 



slightly to test a sense switch and run 
in auto list or normal mode, at the set- 
ting of one switch. 

After having the program around for 
a while, other uses for it have become 
apparent. For example, it requires quite 
a bit of concentration to check keyed- in 
data against the usual assembly-format 
listing. However, using DISEDIT IV 
presents the memory contents in the 
same format as the published listing. 
This speeds up entry checking and 
recognition of errors. Also, an illegal op 
code which results from an improper 
key entry will break up the entire pat- 
tern, so only operands require close 
checking to verify their accuracy. 



Here is how to use the program: The 
user places the address of the first byte 
of executable code in 0002 j^ and 0003 15 
with the low byte first as usual with 
KIM. Note the comment after address 
12E2i6. If the code is to be modified for 
an exit to monitor, etc., then enter the 
end address in 0004ij and 0005i5 



After loading the start address, 
simply go to location I2OO15 and hit 
GO. The printer will print the first line 
of machine code and wait for you to 
space over to the appropriate columns 
and type in labels, mnemonics, 
operands and conunents for that line. 
Hit GO again, type, etc., and do this 
until you hit the end of the program. Of 
course, if you're only debugging, print 
out the whole program as fast as you 
can hit GO. (You could also change to 
auto list mode as outlined above.) 



Meanwhile, the program works this 
way: The starting address is printed 
out, by the code beginning at label 
START. Next, the Y index is loaded [0, 
on the first pass) and used to fetch the 
first byte of code. At location 121Big 
the lower nibble of the op code is strip- 
ped off and loaded into the X register. 
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CLASSIFIEDS 

PROGRAMMER FATIGUE? 
SYM— BUG/MONEX adds 15 commands 
to SYM's repertoire including an interac- 
tive trace/debug. Cassette ® $0200 or 
$3800: $19,95. EPROM (2716-5v) @ 
$F0OO-$F7FF: $39.95. Commented source 
listing: $9.95. RAE-lf/2) FORMAT 
CASSETTE: $35 (requires 8K). Custom 
assembly add $2.00. Foreign add $2.00. 
SASE for more information. 

]eff Holtzman 

6820 Delmar-203 

St. Louis, Missouri 63130 

OSI CI P AND SUPERBOARD USERS 
Programmable tone generator. 256 tones • 
and setable duty cycle are both set with a 
POKE statement. Adds much more yet- ' 
eatility to programming. Uses readily ' 
available parts For complete plans and 
sample software send $7 00 check or 
monev order to. 

Monte Barker 

3413 W Canoga 

Anaheim, CalUomia 91804 ' 

PET MACHINE UNGUAGE GUIDE 

Comprehensive manual to aid machine - 

language programmer. More ^ than 30 ,- 

routines are fully detailedrsp that the' 

reader can put them to immediate use! ,' 

OLD 01 NEW ROMS. $6.95 ;+ .75 postage. ? 

VISA & Mastercharge accepted. ...;." 

Abacus Software .,' ..,.'-■ 

P.O. Box 7211 . ;;; , .■ ■: ,J" 

Grand Rapids, Michigan'49S10 ".: f<' 

OHIO SCIENTIFIC i; '- ■ "' 

Animated Moon Lander gaiqe for CI <in() 
C4 View a series of high resblution lot^' > 
ing lunar vistas as you descend from 120.. 
mues. Accurate instrumeiitp' readings. .A . 
cartoon landing sequence rewards your 
successful landmg.'See what OSI grapaics ' 
can do! Other programs available. S9.93 
cassette 8K; 412.45 disk 24K. • ' •'''■'■^■■. 

Eatthship ' ■ 

P O. Box 489 J 1 ..\ .■".■■' 

■ Sussex, New Jersey 074i61 . ■ ! 'j^.,"' 

OHrO'SClENT{FIC- ' " '' ' '■"''■* 
Catchword, a multi-player, j competitive, 
word game uses the computjer to generate 
letters and pomt values. Letters are mioft 
grabs by any player. The idtii |s to make as ' 
many words as possible in ciossword form ; 
on youi board. The computer recognizes ' 
and penalizes you for all sorts of sloppy 
playing. CI and C4. ,S9.95i cassette 8K:' 
$12.45 disk 24K. Oth^r programs^ 
available. ' ', ■ ,. -.i^- 

■ Earthship !! -. "T? 

P,0 Box 489 . .|f '^ A^V 

Sussex, New Jersey 074^1 . - -.-i.^'- 

DISK LOGBOOK T.- ' . ';i\f, 

A software system for creating, maintaia-^', 
ing. and printing an amateur raqio/ 
logDook, preparing and stajtusing QSLV 
and tracking progress toward multiple 
awards. 48K Applesoft and disk required.^- 
Diskette and manual $29.95 plus 4.5% tax' 
in Ohio ' , " ' . ._ "^ 

Smartware ' )• 

2281 Cobble Stone Ct. , 

Dayton, Ohio 45431 

DISASM FOR APPLE II 
Fast 2-pass disassembler-with-Iabels ,- 
creates source for S-C Assembler [Ver 4.0). 
Adaptable to other APPLE II a.ssemblers 
capable of reading text files Many, 
operating features. Send SASE for more . 
details Program Diskette and user 
documentation: $25 00 postpaid 

RAK — WARE 

41 Ralph Road 

West Orange, New Jersey 07052 
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SAME WITH 


120F 20 


2E 


12 




JSR 


PRINT 


START LOW. 


1212 20 


9E 


IE 




JSR 


OUTSP 


PRINT A SPACE 


1215 A4 


07 






LDY 


TMPY 


GET CURR. INDEX VAL. 


1217 81 


02 






LDA 


(SAL),Y 


& GET OP CODE. 


1219 85 


00 






STA 


TEMP 


REMEMBER THE OP CODE 


121B 29 


OF 






AND 


*$0F 


MASK OFF LOW NIBBLE. 


121D AA 








TAX 




AND USE AS INDEX 


121 E BD 


EO 


12 




LDA 


TABL,X 


TO GET A JUMP VECTOR. 


1221 80 


80 


17 




STA 


VOTR 


SET UP IND. VECT. LOW 


1224 A9 


12 






LDA 


ji'$12 


GET PAGE OF JUMP DEST. 


1226 8D 


81 


17 




STA 


VOTR 


401 AND COMPLETE VECTOR. 


1229 A5 


00 






LDA 


TEMP 


GET CURRENT OP CODE 


1228 6C 


80 


17 




JMP 


(VOTR) 


AND PROCESS IT. 


122E 20 


3B 


IE 


FIR INT 


JSR 


PRTBYT 


PRINT ACCUM. CONTENTS 


1231 20 


9E 


IE 




JSR 


OUTSP 


FOLLOWED BY A SPACE. 


1234 60 








RTS 




RETURN 


1235 A5 


00 




QSMK 


LDA 


TEMP 


GET INVALID OP CODE 


1237 20 


2E 


12 




JSR 


PRINT 


AND PRINT IT. 


123A A9 


3F 






LDA 


#$3F 


LOAD ASCII FOR '?• 


1230 20 


AO 


IE 




JSR 


OUTCH 


AND PRINT IT. 


123F 20 


2F 


IE 




JSR 


CRLF 


NEW LINE 


1242 A4 


07 






LDY 


TMPY 


GET CURRENT INDEX, 


1244 08 








INY 




BUMP IT TO NEXT BYTE 


1245 4C 


05 


12 




JMP 


NEXT 


NEW OP CODE LXATiON 


1248 09 


20 




TSTA 


OMP 


)|f$20 


IS THIS 'JSR'? 


124A FO 


60 






BEQ 


THREE 


IF SO, PRINT 2 OPERANDS. 


124C 09 


80 






OMP 


jf$80 


INVALID OP CODE? 


124E FO 


E5 






BEQ 


QSMK 


IF SO. QUESTION IT 


1250 09 40 






CMP 


#$40 


HOW ABOUT 'RTI'? 


1252 FO 


4E 






BEQ 


ONE 


PRINT ONLY OP CODE. 


1254 09 60 






OMP 


#$60 


RTS? 


1256 FO 


4A 






BEQ 


ONE 


SAME DEAL! 


1258 09 


00 






OMP 


#$00 


IS IT 'BRK'? 


125A FO 


46 






BEQ 


ONE 


IF SO PRINT ONE BYTE 


1250 DO 


49 






BNE 


VHO 


REST ARE 2-BYTE OP CODES 


125E 09 


A2 




TSTB 


CMP 


#$A2 


HAVE WE 'LDX'? 


1260 FO 


45 






BEQ 


TWO 


THEN PRINT TWO BYTES 


1262 DO 


Dl 






BNE 


QSMK 


OTHERWISE, INVALID' 


1264 09 


24 




TSTO 


CMP 


#$24 


IS THI 'BIT'? 


1266 FO 


3F 






BEQ 


TWO 


THEN PRINT TWO 


1268 09 


E4 






CMP 


#$E4 


IT MIGHT BE CPX 


126A FO 


3B 






BEQ 


TWO 


SURE ENOUGH, PRINT TWO 


12CC 09 


84 






CMP 


#$84 


TRY HEX 84 


126E 90 


05 






BOC 


QSMK 


THROW OUT THOSE LESS 



I 
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1270 C9 


C4 




CKP 


lll$C4 


IS IT CPY? 


1272 BO CI 




BCS 


QSHK 


THROW OUT THOSE GRTR. 


1274 90 


31 




BCC 


TWO 


REST ARE 2-BYTE CODES 


1276 C9 


89 


TSTD 


CMP 


#$89 


GOT AN ILLEGAL? 


1278 FO 


BB 




BEQ 


QSMK 


YEP, THROW IT OUT 


127A 29 


10 




AND 


#$10 


SORT ODDS FROM EVENS 


127C FO 


29 




BEQ 


TWO 


TWO BYTE CODES 


127E DO 


2C 




BNE 


THREE 


4 REST ARE 3-BYTE CODES. 


1280 C9 


9A 


TSTE 


CUP 


#$9A 


FIND AN ODD ONE 


1282 FO 


IE 




BEQ 


ONE 


AND LOG IT. 


1284 C9 


BA 




CMP 


#$BA 


GET AN EVEN ONE, 


1286 FO 


1A 




BEQ 


ONE 


COUNT IT AS A ONE, 


1288 29 


10 




AND 


#$10 


SORT OUT THE EVEN ONES, 


128A DO 


A9 




BNE 


QSMK 


AND REJECT THE ODD ONES. 


128C FO 


14 




BEQ 


ONE 


CALL REST ONE-BYTE CODES. 


128E C9 


OC 


TSTF 


CMP 


#$0C 


THIS ONE IS UNUSED 


1290 FO A3 




BEQ 


QSMK 


SO REJECT IT. 


1292 C9 


BC 




CMP 


#$BC 


THIS ONE USED— TRY IT 


1294 FO 


16 




BEQ 


THREE 


THREE BYTE CODE 


1296 29 


10 




AND 


#$10 


SORT OUT ODD ONES 


1298 FO 


12 




BEQ 


THREE 


KEEP THE EVEN ONES 


129A DO 


99 




BNE 


QSMK 


BRAND THE ODD ONES 


129C C9 


9E 


TSTG 


CMP 


#$9E 


ONLY ONE MORE TO TRY 


129E FO 


95 




BEQ 


QSMK 


GOT HIM 


12A0 DO 


OA 




BNE 


THREE 


KEEP REST AS THREE'S 


12A2 A5 


00 


ONE 


LDA 


TEMP 


GET CURRENT OP CODE 


12A4 4C 


C2 12 




JMP 


PRTONE 


AND PRINT IT ALONE 


12A7 A5 


00 


TWO 


LDA 


TEMP 


GET OP CODE 


12A9 4C 


B8 12 




JMP 


PRTTWO 


AND GIVE IT A FRIEND 


12AC A5 


00 


THREE 


LDA 


TEMP 


GET OPCODE 


12AE 20 


2E 12 


PRTTHR 


JSR 


PRINT 


AND GIVE IT A FAMILY! 


12B1 A4 


07 




LDY 


TMPY 


GET CURRENT INDEY 


1283 C8 






INY 




4BUMP IT ONE. 


12B4 B1 


02 




LDA 


(SAD.Y 


' USE TO FETCH NEXT BYTE 


12B6 84 


07 




STY 


TMPY 


KEEP THE INDEX VALUE 


12B8 20 


2E 12 


PRTTWO 


JSR 


PRINT 


PRINT THE BYTE 


12BB A4 


07 




LDY 


TMPY 


GET THE INDEX 


12BD C8 






INY 




ADD ONE 


12BE B1 


02 




LDA 


(SAL),Y 


AND GET ANOTHER BYTE. 


12C0 84 


07 




STY 


TMPY 


REMEMBER THE INDEX 


12C2 20 


2E 12 


PRTONE 


JSR 


PRINT 


PRINT A LONER 


12C5 E6 


07 


NEXT 


INC 


TMPY 


SET UP FOR NEXT PASS 


12C7 A5 


07 




LDA 


TMPY 


BY ADDING THE INDEX. 


12C9 AO 


00 




LDY 


#$00 


CLEAR Y INDEX 


12CB 84 


07 




STY 


TMPY 


AND TMPY. 


12CD 18 






CLC 




PREPARE TO ADD 


12CE 65 


02 




ADC 


SAL 


THE ACCUMULATOR TO SAL. 


12D0 85 


02 




STA 


SAL 


UPDATE SAL 


12D2 A5 


03 




LDA 


SAH 


AND GET HI BYTE 


1204 69 


00 




ADC 


#$00 


BUMP IT IF CARRY 


12D6 85 


03 




STA 


SAH 


AND UPDATE SAH. 


12D8 A5 


02 




LDA 


SAL 


GET CURRENT POINTER 


12DA C5 


04 




CMP 


EAL 


= LAST LOCATION? 


12DC 90 


06 




BCC 


STOPA 


WAIT FOR SLOW TYPIST! 


12DE A5 


03 




LDA 


SAH 


TEST SAH 


12E0 C5 


05 




CMP 


EAH 


LAST BYTE? 


12E2 90 


00 




BCC 


STOPA 


OPTIONAL PROV. FOR MON. 
EXIT 


12E4 00 




STOPA 


BRK 




WAIT FOR SLOWPOKE 


12E5 00 






BRK 




FILLER BYTE 


12E6 20 


2F IE 


PRESS 


JSR 
GO 


CRLF 


BRK STOPS IT HERE- 


12E9 4C 


08 12 




JMP 


START 


GO BACK FOR MORE 


12EC 48 A7 5E 


37 64 A7 A7 


37 A2 76 


80 37 8E AC 9C 37 



This index is used to locate a jump vec- 
tor from the table at the end of the pro- 
gram. Note that this vector is stored at 
1780i6 and that llj^ is loaded into 
1781. At 122Bij an indirect jump takes 
you to the particular sorting routine 
which tests the op code to see if it is 
legal. If it is, the sort routine also sets 
up to print the operands for that op 
code. 

For example, let's assume that lO^, 
is the op code under consideration. 
After the mask step at 121Bi6 X = 0. 
The jump vector at 12FAi5(X), where X 
is 0, is 48 15 .In other words, the pro- 
gram goes to 1248 15 to see if it has a 
legal op code. 

At 1248i5 the first test is for lOi^ 
which tests true. The program goes 
directly to label THREE (12ACi6|, 
where the op code is picked up from 
TEMP and printed. Since 20i6 is a 
three-byte op code, the program con- 
tinues on through labels PRT2 and 
PRTl, then on to NEXT, which adds 
the current Y index (now up to 02 after 
having printed the JSR op code and the 
associated two address bytes), and adds 
it to the start address in SAL. Next, 
SAH is updated if there was a carry, and 
TMPY zeroes TMPY so that location 
1215i6 will begin with 7=0 again. 
The program continues imtil you stop 
it, or it stops by finding it has qualified 
on the last address to be printed out. In 
the case of a two-byte code, the jump is 
to TWO and then PRT2; for a single- 
byte code the jump sequence is ONE, 
PRTl. 

If you wish to locate this program in 
another area of memory, simply change 
all page numbers (the third byte in any 
three-byte codes) from 12 to the desired 
location. For example, to begin the pro- 
gram at 0200i5 simply change all 12' s 
in the third byte to 02. Note that all the 
other three-byte codes refer to KIM 
monitor locations, which must remain 
imchanged. 

Ralph Teuny has worked in the electronics 
industry since 1954, and was working at 
Texas Instruments when micros came of 
age. In recent years, he has been working 
for George Goode & Associates, Inc.. 
Besides general applications of micros in 
laboratory work there, he teaches 
Assembly language programming on the 
Texas Instruments TMS 9900 
microprocessor. He has had a KIM-1 for 
about four years. Part of his work has been 
writing about micros— helping write a 
textbook, application notes, and 
instruction and user manuals. 
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POWER A PLUS II 



TM 



Check out the specifications on this 
industrial quality power supply. 



INPUT SPECIFICATIONS: 105-125(210-250 VAC, 50*0 Hz 


OUTPUT SPECIFICATIONS 


OUTPUT 


RIPPLE& NOISE 


REGULATION 


+ 5VDCa5.0A 
(OV, CF, RV) 


10 mv. max. 
(8 0.0 to 4.5A 


± 0.1%, line and load 
with 10% line change 


+ 12VDC® 0.5A 
(TO, OV) 


1 5 mv max. 
® 0. to O.SA 


±0.1%, line and kwt 
with 10% Nne change 


-1-24 VDC ® 1.0A* 
(1.5A surge) 
(TO, OV, RV) 


24 mv max. 
® 0.0 to 1.0A 


±5% nominal, 
±7% max. 


Optional 
-5 VDC & 0.5A 
(TO, OV, RV) 


15 mvmax. 
® 0.0 to O.SA 


■f05%, line and load 
with 10% line change 


Protection Key: OV 
RV- 


over voltage, CF • current loldbaek 
reverse voltage, TO - thermal overload 



Weighs 4 pounds. This open frame model has all of the voltages 
required by the AIM/SYM/KIM, plus extra voltages and 
capacities for driving additional expansion boards and devices. 
Includes fuse holder, fuse, line cord, and switch. No other power 
supply you can buy offers this power, combination of voltages, 
quality and low price. 

POWER A PLUS II $65. 

Dealer and OEM Inquiries Invited 

Prices auoted US — does not include st\lpplng & handling. 



ii^caa 



v^ 



' ^ ^ 1 34 Chelmsford St., Chelmsford, MA 01824 

617/256^649 



AIM 
PLUS II 



TM 




Power and Protection for the AIM 

This heavy duty enclosure provides protection for the 
AIM, has provision for the addition of one expansion 
board, and has a high quality power supply built-in. 
Turn your naked AIM Into an attractive, compact 
system. The Power supply provides -i-5V @ 5 amps, 
enough for the AIM and several expansion boards, 
+ 24V @ 1 amp with surge capability to handle the 
AIM Printer, and includes +12V for use on various 
expansion boards and other devices. 
The enclosure is made of tough, commercial 
strength thermoformed plastic and provides easy 
access to the printer and the expansion connectors. 
No disassembly of your AIM or cutting is required. 

Priced at just $125.00 US, this is certainly the best 
way to give your AIM the protection it deserves and 
the power it requires. 

Prices quoted US — does not include shipping & handling. 



^CiQl 



tJ 



34 Chelmsford St., Chelmsford, MA 01824 
617/256-3649 



(S) 



DRAM PLUS 



TM 



DRAM PLUS offers the most powerful memory expansion 
capabilities available for the AIM, SYM, & KIM microcom- 
puters. Its many Important features Include: 

• 16K or 32K Dynamic RAM with all refresh handled 

on the board and completely transparent to the host 
microcomputer. 

• Memory does not have to be addressed as a single 16K 
or 32K segment. 4K segments of memory may be placed 
on 4K boundaries. 

• Up to 1 6K ROM/EPROM with provision for four ROMs or 
EPROMs: 2716/2516 2K EPROMs, 2732/2532 4K 
EPROMs, or 2332 ROMs. These may be mixed on the 
board. 

• Two Versatile Interface Adapters, each with two 8-bit 
I/O ports, additional handshaking lines, two timers, and 
a serial-to-parallel shift register. 

• Prototyping Area has space for adding circuits: memory 
write protection, floppy disk controller, communica- 
tions devices, A/D or D/A, etc. 

• EPROM Programmer handles all four types of EPROM: 
2716/2516 2K and 2732/2532 4K. 

• Simple Power Requirements of -1-5 volts at 1 amp and 
+ 12 volts at 150 mllliamps. On board regulators permit 
unregulated power to be used. 

DRAM PLUS: 16K RAM $295, 32K RAM $395 

Dealer and OEM Inquiries Invited 
Prices quoted US — does not include shipping & handling. 




34 Chelmsford St., Chelmsford, MA 01824 
617/256-3649 



® 



VIDEO PLUS II 



TM 



What could you add to the Video PLUS board to make It better? 
YOU COULD— 

• Put the character generator in EPROM so that the user 
could define his own character set ■ 128 or 256 characters 

• Make the character width programmable so that up to 120 
characters per line are possible In a dense mode, or well 
separated 80 characters In a word processing mode 

• Add extra RAM for program execution 

• Provide ail of the necessary software to interface to an AIM, 
SYM, or KIM on an EPROM 

• Provide a number of additional display features such as flicker 
free operation, reverse video, character blank/unblank, support 
for keyboards with Inverted strobes and/or data, ... 

• Improve the ASK Video Software so that It does not use any of 
page zero or page one, making it totally transparent to the AIM, 
SYM and KIM monitors, editors, assemblers, ... ^sse note) 

• Provide DIP switches to select the various options 

• Provide full support, Including software, for running the board as 
a stand-alone terminal 

• Provide an asynchronous communication facility with RS232 and 
20 Ma Current loop operation at 50 to 19,000 baud 

AND WE DIDI Video Plus II has all of the features of the original 
Video Plus, and ali of the above features as well. 
Note: The enhanced Video Plus II software Is available to Video Plus 
owners at a nominal charge • HO for cassette and documentation. 
VIDEO PLUS II: Standard board $295 
Options: Additional 4K RAM $50 

6502 Standalone processor $20 
Communications provision $35 
Dealer and OEM Inquiries Invited 
Prices quoted US — does not include shipping & handling. 




v. 



34 Chelmsford St., Chelmsford, MA 01824 
617/256-3649 
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SYM 
Bridge 
Trainer 



An elementary program 
designed to operate on a SYM-1, 
and requiring less than Vi K of 
RAM. It can easily be adapted to 
the KIM, or any other 6502. Its 
general principles can be used 
by anyone. 



Len Green 

15 Yotam Street 

Achuza 

34 675 Haifa, Israel 



A somewhat elderly physics teacher 
with no previous knowledge of com- 
puters, and shamefully little of elec- 
tronics, I purchased one of the first 
SYM-l's in summer 1978. There was 
then no documentation available for 
novices like me. Thanks to MICRO, 
and more recently SYMpbysis, the 
situation has improved irmnensely, 
and I have acquired much more SYM 
material during the past few months 
than in the whole previous IVi years. 
MICRO and other national magazines 
have published articles during the past 
year on clocks, music-makers, Morse- 
Coders, typing trainers, etc., some of 
them overlapping; also games such as 
Nim, Mastermind, Noughts and 
Crosses and Limar Lander. However, to 
the best of my knowledge, nothing has 
been published on my obsession prior 
to microprocessors, that is— bridge. 
The following is my undoubtedly crude 
and amatevir attempt to rectify this 
omission. 



LEN GREEN: 
BRIDGE TRAINER 

ZERO PAGE ADDRESSES RESERVED: 

$0OB0 TO $OOBC— NORTH'S HAND 
$OOBD TO $00C9~EAST'S HAND 
$OOCA TO $00D6--S0UTH ' S HAND 
$00D7 TO $00E3— WEST'S HAND 

$00E4 TO $O0EC~SCRATCHPAD 
$00F4 TO $00F7~SCRATCHPAD 

$0OED~NOTRUMP FLAG 
$OOEE— HIGH-CARD POINTS (H) 
$OOEF--TOTAL-CARD POINTS (T) 
$0OFO~ii' OF CLUBS IN HAND "S" 
$00F1— # OF D 

$00F1— # DIAMONDS IN HAND "S" 
$00F2— # OF HEARTS IN HAND "S" 
$00F3~)!' OF SPADES IN HAND "S" 
$0OF8~LONGEST 4 STRONGEST SUIT 





SYM CALLS: 




03B4 


MONITR 


« 


$8000 


03B4 


DELAY 


« 


$835A 


03B4 


BEEP 


« 


$8972 


03B4 


ACCESS 


* 


$8B86 


03B4 


DUMPT 


* 


$8E87 


03B4 


VIATI 


* 


$A004 


03B4 


RIOTTI 


« 


$A41E 


03B4 


DISBUF 


» 


$A640 


03B4 


TV 


« 


$A656 


03B4 


STRTAD 


« 


$03B4 


03B4 


ENDAD 


« 


$03B8 


03B4 


SEGMNT 


» 


$03BC 


03B4 


SUIT 


« 


$03C0 


03B4 


VALUE 


* 


$03C4 



NEW MONITOR (M0N1 .1 ) 



(continued) 
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Bridge is an intricate game involv- 
ing the interaction of four players at the 
bidding stage and three players during 
the actual play. To simulate the game 
on a computer requires an extremely 
long program, and even such a program 
may not succeed in covering all of the 
game's different aspects. Several com- 
mercial packages are advertised, but 
since I haven't seen any of them, I can- 
not judge their merits and limitations. 
Conversely, a short program can only 
deal with some restricted aspect of the 
game, and hence is somewhat of a gim- 
mick. This probably explains the 
paucity of bridge (and chess) routines 
printed in journals. A complete and 
entertaining game of blackjack, 
Mastermind and the like, can be com- 
pressed into about ViK bytes of 
machine code, which is a nice length 
for a magazine article. But with bridge, 
the same ViK will hardly be enough for 
the preliminaries and bidding, let alone 
the actual play itself! 

This program only goes as far as the 
opening bids, but all the shuffling, 
dealing, arranging, and also opening bid 
routines together only occupy about 
V^K of RAM. It was designed to display 
fully on the 7-segment panel of a 
minimal IK SYM (or KIM), and the 
display, timing and beeping routines 
add another 130 bytes or so, making a 
total listing of 463 bytes. As it stands, 
it can only be used to check, quiz or 
compare opening bids, although it can 
serve to improve speed in bidding, gain 
insight into the different configurations 
of the four hands, etc. However, many 
of the fundamental mechanisms for 
calling and playing bridge are present, 
including all four hands, point counts, 
suit lengths, short and long sviits, no- 
trump and pre-emptive distributions, 
etc. This program should provide a 
basis of routines which could be 
developed and expanded into a 
reasonably complete game of bridge, to 
nm on SYM's 8K extended onboard 
RAM, or possibly to be adapted for 
BASIC. 

To operate, simply key in 
GO/200/CR. A deck is shuffled and 
the 52 cards dealt into the four hands 
N, E, S and W, each hand being arrang- 
ed into the generally accepted order, 
high to low, of spades, hearts, 
diamonds and clubs. North's hand is 
then displayed card by card, ".n" on 
the left reminds you that North's hand 
is always displayed first, and the cards 
themselves appear on the extreme 
right. Record North's hand as it beeps 
away, and after the 13th card, the 
display blanks for 10 seconds, giving 



0200 










ORG 


$0200 




0200 


20 


86 


8B 




JSR 


ACCESS 


UNWRITE -PROTECT 


0203 


AO 03 






LDY 


#$03 


SYSTEM RAM 


0205 


20 


5B 


03 




JSR 


INIT 


FOR NORTH 


0208 


20 


IB 


02 




JSR 


DEAL 


i ROUND NORTH 


020B 


A9 03 




PLAY 


LDA 


#$03 


ROUND E,S,i W 


0200 


48 








PHA 






020E 


68 






LBLA 


PLA 






020F 


A8 








TAY 






0210 


88 








DEY 






0211 


98 








TYA 






0212 


48 








PHA 






0213 


20 


7C 


03 




JSR 


INITA 


FOR E,S, i W 


0216 


68 








PLA 






0217 


48 








PHA 






0218 


DO 


F4 






BNE 


LBLA 




021 A 


60 








RTS 




END!— DISPLAY "W". 


021 B A9 FF 




DEAL 


LDA 


iK$FF 


FILL CARBUF WITH 


021D 


A2 


33 






LDX 


#$33 


ILLEGAL CARD #$FF 


021 F 


95 BO 




LBLB 


STA 


$0080, X 




0221 


CA 








DEX 






0222 


10 


FB 






BPL 


LBLB 




0224 


AO 


33 






LDY 


#$33 




0226 


AD 


IE 


A4 


RAND 


LDA 


RIOTTI 


6532 RIOT TIMER 


0229 


60 


04 


AO 




ADC 


VIATI 


6522 VIA TIMER 


022C 


29 


3F 




FXCARD 


AND 


#$3F 


GENERATE PSEUDO- 


022E 


85 


F8 






STA 


$00F8 


RANDOM 


0230 


29 


OF 






AND 


#$0F 


TRIO-DECIMAL 


0232 


C9 


OD 






CMP 


#$0D 


CARDS 


0234 


80 


FO 






BCS 


RAND 




0236 


A5 


F8 






LDA 


$00F8 




0238 


A2 33 




FILLPK 


LDX 


#$33 


CARD ALRFADY 


023A 


D5 


BO 




LBLC 


CMP 


$0OBO,X 


IN PACK? 


023C 


FO 


E8 






BEO 


RAND 


TRY AGAIN 


023E 


CA 








DEX 






023F 


10 


F9 






BPL 


LBLC 




0241 


99 


BO 00 




STA 


$00B0,Y CARDS INTO CARBUF | 


0244 


88 








DEY 






0245 


10 


DF 






BPL 


RAND 




0247 


20 


8B 


03 


ARRHAN 


JSR 


SEQUEN 


HANDS INTO 


024A 


AO 


OC 




EXHAN 


LDY 


#$0C 


BRIDGE SEQUENCE 


024C 


B1 


E4 




LBLD 


LDA 


($0OE4) 


,Y EXAMINE HAND- 


024E 


48 








PHA 






024F 


20 


83 


03 




JSR 


HIDIG 


EXAMINE 


0252 


F6 


FO 




SULEN 


INC 


$00F0,X 


HIGH ORDER DIGIT 


0254 


68 








PLA 




INC SUIT LENGTHS 


0255 


29 


OF 




HIPTS 


AND 


#$0F 


i LOW ORDER DIGIT 


0257 


38 








SEC 






0258 


E9 


08 






SBC 


#$08 


SUBTRACT 8 POINTS 


025A 


30 


07 






BMi 


LBLE 


POSITIVE? 


025C 


18 








ac 






025D 


65 


EE 






ADC 


$0OEE 


SUM INTO HIGH-CARD 


025F 


85 


EE 






STA 


$OOEE 


POINT LOCATION 


0261 


85 


EF 






STA 


$OOEF 


COPY INTO TOTAL 


0263 


88 






LBLE 


DEY 




POINT LXATION 


0264 


10 


E6 






BPL 


LBLD 




0266 


A2 


03 




SUPTS 


LDX 


#$03 


# OF CARDS IN SUIT 


0268 


38 






LBLF 


SEC 




(S) 


0269 85 


FO 






LDA 


$00F0,X 




026B 


E9 


04 






SBC 


#$04 


SUBTRACT 4 FROM 


026D 


30 


05 






BMi 


DUPLIC 


LENGTH. POSITIVE? 


026F 


18 








ac 






0270 


65 


EF 






ADC 


$00EF 


ADD TO TOTAL POINTS 


0272 


85 


EF 




TOTPTS 


STA 


$00EF 





42 



MICRO - The 6502 Journal 



No. 32- January 1981 



0274 B5 


FO 


DUPLIC 


LDA 


$OOFO,X COPY SUIT LENGTHS 


0276 95 


F4 




STA 


$00F4,X 


INTO $F4 TO $F7 


0278 CA 






DEX 




FOR STRONGEST 


0279 10 


ED 




BPL 


LBLF 


SUIT 


027B AO 


OC 


DIHAN 


LDY 


#$0C 


DISPLAY CARDS 


027D 98 




LBLG 


TYA 




OF HAND 


027E 48 






PHA 






027F B1 


E4 




LDA 


($00E4) 


,Y 


0281 20 


07 03 




JSR 


DIHANA 




0284 68 






PLA 




DISPLAY CARD 


0285 A8 






TAY 




PAUSE i BEEP 


0286 88 






DEY 






0287 10 


F4 




BPL 


LBLG 




0289 A9 


F4 


CHOOSU 


LDA 


#$F4 


SET UP CLUE3S 


028B 85 


E7 




STA 


$00E7 


INDIRECT ADDRESSES 


028D 85 


E9 




STA 


$00E9 




028F A9 


F8 




LDA 


#$F8 


—ALSO SPADES+1 


0291 85 


EB 




STA 


$OOEB 




0293 20 


8B 03 




JSR 


SEQUEN 


ARRANGE SUITS 


0296 A5 


F7 




LDA 


$00F7 


IN ORDER 


0298 A2 


03 




LDX 


#$03 


GET LONGEST AND 


029A D5 


FO 


LBLH 


CKP 


$OOFO,X 


STRONGEST SUIT 


029C FO 


03 




BEQ 


LBLI 




029E CA 






DEX 






029F 10 


F9 




BPL 


LBLH 




02A1 86 


F8 


LBLI 


STX 


$00F8 


AND PUT INTO $F8 


02A3 A9 


DB 




LDA 


«iDB 


PUT "2." INTO 


02A5 8D 


44 A6 




STA 


DISBUF 


+04 D+4 


02A8 A9 


39 




LDA 


#$39 


PUT "C" INTO 


02AA 8D 


45 A6 




STA 


DISBUF 


+05 D+5 


02AD A5 


EF 


G06ID 


LDA 


SOOEF 


START BIDDING 


02AF C9 


19 




CMP 


#$19 


T=25 POINTS OR MORE 


02B1 90 


02 




BCC 


LBLJ 


ELSE CARRY ON 


0283 BO 


3C 




BCS 


FINA 


YES? FORCE TO FINA 


02B5 C9 


16 


LBLJ 


CMP 


#$16 


T=22 POINTS OR MORE? 


02B7 90 


6E 




BCC 


CONBID 


ELSE GOT TO CONBID 


02B9 A5 


EE 


NOTRUM 


LDA 


$OOEE 


NOTRUMP CALL? 


02BB C9 


15 




CMP 


#$15 


H=21 POINTS? 


02BD FO 


2A 




BEQ 


FILLSU 


ONLY 21! TO FILLSU 


02BF C9 


OF 




CMP 


#$0F 


H=15 POINTS? 


02C1 FO 


26 




BEQ 


FILLSU 


ONLY 15! TO FILLSU 


02C3 A2 


03 




LDX 


#$03 




02C5 B5 


FO 


LBLK 


LDA 


SOOFO.X 




02C7 C9 


02 




CMP 


#$02 


SINGLETON OR VOID? 


02C9 90 


11 




BCC 


LONGSU 




02CB DO 


02 




BNE 


LBLL 


ELSE CONTINUE 


02CD E6 


ED 




INC 


$00ED 




02CF CA 




LBLL 


DEX 






02D0 10 


F3 




BPL 


LBLK 


CHECK ALL 4 SUITS 


02D2 A5 


ED 




LDA 


$00ED 




0204 C9 


02 




CMP 


#$02 


2 DOUBLETONS? 


02D6 BO 


04 




BCS 


LONGSU 


YES? TO LONGSU 


02D8 A9 D4 




LDA 


#$D4 


"N" INTO D+5 


02DA DO 


12 




BNE 


FIN 


FORCE BRANCH TO FIN 


02DC A5 


EF 


LONGSU 


LDA 


$0OEF 


DISTRIBUTION POINTS? 


02DE 05 


EE 




CMP 


$OOEE 


I.E. 5 CARD SUIT 


02E0 DO 


07 




BNE 


FILLSU 


THEN GOTO FILLSU 


02E2 A9 


86 


FILLAC 


LDA 


#$86 


ELSE 


02E4 8D 


44 A6 




STA 


DISBUF 


+04 "1" INTO D+4 


02E7 DO 


08 




BNE 


FINA 


& FORCE TO FINA 


02E9 A6 


F8 


FILLSU 


LDX 


$00F8 


TAKE LONGEST 


02EB BD 


CO 03 




LDA 


SUIT.X 


4 STRONGEST SUIT 


02EE 8D 


45 A6 


FIN 


STA 


DISBUF 


+05 i PUT INTO D+5 


02F1 48 




FINA 


PHA 






02F2 AO 


80 




LDY 


#$80 


DELAY ABOUT 10 SECS. 

(continued) 



you time to make North's bid. SYM's 
verdict then beeps onto the display. 
Did you call correctly? If North makes a 
valid bid, the rovmd stops there, since a 
short routine like this cannot cope with 
overcalls and responses. If, however, 
North passes, ".E" is displayed on the 
left of the display and the process is 
repeated for East's hand, followed by 
South' s and finally West's. 



Before you start bidding you will 
have to ascertain SYM's conventions in 
advance, as per recognized bridge prac- 
tice. Regrettably, its criteria are 
mechanical and pretty limited, but 
then some human bridge players are no 
better. High card points are summed as 
usual, with ace counting as 4; king, 3; 
queen, 2; and jack, 1. Distribution 
points are added by incrementing for 
every card in each suit above four. This 
is possibly no more inaccurate than the 
method of counting doubletons, 
singletons and voids, which is also 
partially performed in this routine, 
but only used for testing no-trumps 
bidding. 



Above 24 total points automatically 
produces a strong two club call, and 
generally below 13 points a no-bid. Bet- 
ween 22 to 24 points and between 16 to 
18 points, two no-trump and one no- 
trump calls are examined. The suit will 
then be no-trumps, providing that the 
high card points alone are not less than 
22 or 16 points respectively, and the 
hand is balanced in the sense that there 
are no voids or singletons, and not 
more than one doubleton. This pro- 
gram does not examine individual suit 
stoppers. If no-trumps is eliminated, 
the longest and highest suit is chosen at 
the appropriate two or one level. If no 
suit longer than four cards is present, 
the bid will be a conventional one club, 
and a strong one club is bid with any 
hand possessing between 19 and 21 
points. The usual element of confusion 
exists, in that any club call may 
possibly also be an ordinary genuine 
long club suit call. If no proper bid is 
valid, the routine tries one possible pre- 
emptive bid only. With a seven card 
suit or longer, and not less than 10 
points including distribution, the bid 
will be three of the longest suit. Failing 
this, SYM will pass and no-bid with 
"P.S.". 

To adapt for KIM, the upper zero- 
page storage locations can easily be 
relocated. The special SYM monitor 
routines and peripheral addresses have 
been underlined on the listing and 
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subroutines marked with asterisks. 
These must be replaced by their KIM or 
other microprocessor equivalents. The 
program utilizes both X and Y indexed 
indirect addressing and can be relocated 
anywhere else in memory. However, I 
have somewhat unethically cut out a 
number of bytes in DISBUF and 
DUMPT routines, and a couple of 
minor alterations will be necessary if 
the program is moved to considerably 
higher memory. DUMPT is a 
subroutine in the new revised SYM 
monitor, which is utilized here to give 
a cheap 3 byte fixed delay of about 10 
seconds. If a different delay is desired, 
store a byte into TAPDEL at location 
$A630 before the JSR to DUMPT:— 01 
gives ? 4 seconds through to FF, which 
gives 7 1/4 minutes delay. Alternative- 
ly, this can be replaced by a standard 
delay routine. DISBUF in SYM's 
monitor System— RAM occupies 
$A640 = D + O to $A645 = D + 5, the 
former storing the extreme left hand 
character to be displayed, and the latter 
the right hand one. Three of these six 
locations are used for the display, one 
is blanked out with #00, and D + and 
D + 2 are overwritten by the initial 
GO/200 command. When relocating to 
high memory on SYM, the necessity for 
any alteration to these two routines can 
be obviated if desired by simply adding 
a JMP to start address command at, say, 
location $300. 

TV controls the period of DELAY 
logarithmically, and location $03 IC 
can be altered for quicker or slower 
display of the cards. KIM owners note 
that the SYM monitor routine DELAY 
includes SCA^fD. It transfers the six 
segment codes previously stored in 
DISBUF to the 7-segment display, and 
retains this display for the period set 
into TV. The deck of four hands is dealt 
into CARBUF zero-page locations 
$00B0 to $00E3. Locations $00E4 to 
$00F8 are used for indirect base ad- 
dresses, SEQUEN locations, flags for 
points, suits, inbalance, long-suit, etc. 
The cards themselves do not get 
disturbed during the execution of the 
program and could be used later for 
continuing and extending the game. 
The display codes in the tables at the 
end have been chosen to be as clear and 
unambiguous as possible, within the 
obvious limitations of 7-segments. One 
or two are a bit weird and need getting 
used to. 

SYM has a useful Verify Checksum 
routine, amongst others, directly 
available at its keypad. In order to 
check that no byte has been keyed in 
incorrectly or subsequently altered, 
either before or after nmning the pro- 



02F4 20 87 8E 




JSR 


DUMPT 


NEW MONITOR (MON 1.1) 


02F7 20 72 89 




JSR 


BEEP 


1 ONBOARD BEEP 


02FA 68 




PLA 






02FB C9 EE 




CMP 


^SEE 


"PASS?"— CONTINUE 


02FD DO 02 




BNE 


LBLM 


ANY BID?— STOP 


02FF FO 1A 




BEQ 


01 BEEP 


FORCE TO DIBEEP 


0301 20 IB 03 


LBLM 


JSR 


01 BEEP 


JSR DIBEEP 


0304 4C 00 80 




JMP 


MONITR 


MONITOR COLD— END! 


0307 48 


OIHANA 


PHA 




SHOW CARDS OF HAND 


0308 29 OF 




AND 


#$0F 


LOW ORDER DIGIT 


030A AA 




TAX 






0308 BD C4 03 




IDA 


VALUE, X 


CARD FACE VALUE 


030E 8D 44 A6 




STA 


DISBUF 


+04 INTO D+4 


0311 68 




PLA 






0312 20 83 03 




JSR 


HIDIG 


—GET HIGH DIGIT 


0315 BD CO 03 




IDA 


SUIT,X 


CARD SUIT 


0318 8D 45 A6 




STA 


DISBUF 


+05 INTO D+5 


031 B A9 OB 


01 BEEP 


LDA 


lif$08 


DISPLAY FOR 


0310 8D 56 A(5 




STA 


TV 


3 SECONDS 


0320 20 5A 83 




JSR 


DELAY 


APPROX. 


0323 20 72 89 




JSR 


BEEP 


4BEEP ONCE 


0326 60 




RTS 






0327 A9 86 


CONBID 


LDA 


jif$86 


CONTINUE BIDDING 


0329 8D 44 A6 




STA 


DISBUF 


+04 "1." INTO 0+4 


032C A5 EF 




LDA 


$OOEF 


TOTAL POINTS AGAIN 


032E C9 13 




CMP 


#$13 


19 POINTS OR MORE? 


0330 90 02 




BCC 


LBLN 


ELSE CONTINUE 


0332 BO BD 




BCS 


FINA 


FORCE BRANCH TO FINA 


0334 C9 10 


L8LN 


CMP 


#$10 


16 POINTS OR MORE? 


0336 90 03 




BCC 


L8L0 


ELSE CONTINUE 


0338 4C B9 02 




JMP 


NOTRUM 




033B C9 OD 


L8L0 


CMP 


#$0D 


13 POINTS OR MORE? 


033D 90 02 




BCC 


PREMPT 


ELSE CONTINUE 


033F BO 98 




BCS 


LONGSU 


FORCE TO LONGSU 


0341 C9 OA 


PREMPT 


CMP 


«to^ 


10 POINTS OR MORE? 


0343 90 OD 




BCC 


NOBID 


ELSE NOBID 


0345 A5 F7 




LDA 


$00F7 


7 CARD SUIT OR MORE? 


0347 C9 07 




CMP 


«07 




0349 90 07 




BCC 


NOBID 




0348 A9 CF 




LDA 


#$CF 


"3> INTO D+4 


034D 8D 44 A6 




STA 


DISBUF 


+04 


0350 DO 97 




BNE 


FILLSU 


FORCE TO FILLSU 


0352 A9 F3 


NOBID 


LDA 


#$F3 


"P." INTO D+4 


0354 8D 44 A6 




STA 


DISBUF 


+04 


0357 A9 ED 




LOA 


HED 


"S" INTO 0+5 


0359 DO 93 




BNE 


FIN 


FORCE TO FIN 


0358 A9 00 


INIT 


LOA 


#$00 


SUBROUTINE: 


035D 8D 43 A6 




STA 


DISBUF 


+03 FILL WITH 0— 


0360 A2 13 




LDX 


#$13 


0+3 & STORAGE 


0362 95 E4 


L8LP 


STA 


$00E4,X 


LOCATIONS 


0364 CA 




DEX 




$E4 TO $F8 


0365 10 FB 




BPL 


LBLP 




0367 89 BC 03 




LDA 


SEGMNT, 


Y "N","E","S","W" 


036A 8D 41 A6 




STA 


DISBUF 


+01 INTO D+1 


0360 89 B4 03 




LOA 


STRTAD, 


Y 


0370 85 E4 




STA 


$00E4 




0372 85 E7 




STA 


$00E7 


ADDRESSES FOR HANDS 


0374 85 E9 




STA 


$00E9 




0376 89 88 03 




LOA 


ENDAD.Y 




0379 85 EB 




STA 


$OOEB 




0378 60 




RTS 




S.R.. ROUND E,S, i W 


037C 20 5B 03 


INITA 


JSR 


INIT 




037F 20 47 02 




JSR 


ARRHAN 




0382 60 




RTS 






0383 EA 


HIDIG 


NOP 




SUBROUTINE: 
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0384 


EA 






NOP 




PUT HIGH ORDER 


0385 


4A 






LSR 


A 


DIGIT INTO 


0386 


4A 






LSR 


A 


X 


INDEX REGISTER 


0387 


4A 






LSR 


A 


(BOTH NOP'S ARE | 


0388 


4A 






LSR 


A 




SUPERFLUOUS!) 


0389 


AA 






TAX 








038A 


60 






RTS 








038B 


A2 


00 


SEQUEN 


LDX 


#$00 


SUBROUTINE: | 


038D 


A1 


E7 


LBLQ 


LDA 


($00E7 


,X) 


REARRANGE IN 


038F 


CI 


E9 




CMP 


($0OE9,X) 


ASCENDING ORDER 


0391 


90 


OC 




BCC 


LBLR 


CONTENTS OF ANY 


0393 


A1 


E7 




LDA 


($00E7,X) 


CONTIGUOUS 


0395 


85 


E6 




STA 


$00E6 


ZERO-PAGE 


0397 


Al 


E9 




LDA 


($00E9,X) 


MEMORY BLOCK... 


0399 


81 


E7 




STA 


($00E7,X) 




039B 


A5 


E6 




LDA 


$O0E6 






039D 


81 


E9 




STA 


($00E9,X) 


...START & STOP+1 


039F 


E6 


E9 


LBLR 


INC 


$00E9 


INDEXED INDIRECT 


03A1 


A5 


E9 




LDA 


$00E9 


ADDRESSES 


03A3 


C5 


EB 




CMP 


$OOEB 


$E7 TO $EC 


03A5 DO 


E6 




BNE 


LBLO 


• 


.$E6 IS A 


03A7 


E6 


E7 




INC 


$00E7 


WORK LOCATION | 


03A9 


A5 


E7 




LDA 


$00E7 






03AB 


85 


E9 




STA 


$00E9 






03AD 


A5 


E9 




LDA 


$00E9 






03AF 


C5 


EB 




CMP 


SOOEB 






03B1 


DC 


DA 




BNE 


LBLQ 






03B3 60 






RTS 








0384 


D7 




STRTAD 


S 


$D7 


W 


START ADDRESSES 


0385 


CA 






S 


$CA 


S 




0386 BD 






s 


$BD 


E 




03B7 BO 






s 


$B0 


N 




03B8 


E4 




ENDAD 


s 


$E4 


W 


END-l-1 ADDRESSES 


03B9 D7 






s 


$D7 


S 




03BA CA 






s 


$CA 


E 




03BB 


BD 






s 


$80 


N 










DISPLAY 


SEGMENT TABLES 




038C 


3A 




SE6MNT 


B 


$3A 


W 


(U) 


03BD 


6D 






s 


$6D 


S 




03BE 


79 






a 


$79 


E 




03BF 


54 






s 


$54 


n 




03C0 39 




SUIT 


s 


$39 


C 




03C1 


5E 








$5E 


d 




03C2 


76 








$76 


H 




03C3 


6D 








$6D 


S 




03C4 06 




VALUE 




$06 


2. 




03C5 CF 








$CF 


3. 




03C6 E6 








$E6 


4. 




03C7 


AD 








$AD 


5. 


(G.) 


03C8 


FD 








$FD 


6. 




03C9 87 








$87 


7. 




03CA FF 








$FF 


8. 




03CB E7 








$E7 


9. 




03CC 


F8 








$F8 


10 


<L) 


03C0 


9E 








$9E 


J. 




03CE 


EB 








$EB 


<?. 


(°) 


03CF 


FO 








$F0 


K. 


(h.) 


0300 F7 








$F7 







gram, the correct 4 digit checksum 
from location $0200 to $03D0 is #F590. 

Shortly after completing this arti- 
cle, I received SYM's mini 2K Symbolic 
Assembler and have just got it up and 
running. Now for the first time I am ex- 
periencing the pros and cons of 
assembly language programming. To 
date I have been entirely confined to 
purely hand assembled machine code. 
Therefore, I merely put this program 
through my rudimentary SYM 
disassembler to produce the accom- 
panying 6502 format listing, and added 
some pseudo-assembler labels and 
plenty of comments for elucidation. 

The key routine of this program is 
FXCARD. It takes a stream of pseudo- 
random hexadecimals and alters them, 
where necessary, to the 52 unique trio- 
decimal integers between #00 and #3C. 
The low order digit indicates the card's 
face value from two to ace. The high 
order digit indicates the suit in bridge 
strength order from clubs to spades. For 
example, the numbers 3C, 38, 32, 2A, 
29, 25, 21, IC, 17, 15, OC, OB, 06 repre- 
sent a maximum one no-trump 
hand;— Spades— A, T, 4; Hearts— Q, J, 

7, 3; Diamonds— A, 9, 7; Clubs— A, K, 

8. FXCARD simply ANDS out the hex- 
adecimals with 3F, and filters out those 
ending in D, E and F. This system later 
enables simple examination of each 
card by merely ANDing plus right 
shifts. SULEN determines suit lengths 
[S], by incrementing four counters for 
cards with identical high order digits. 
mPTS subtracts #8 from the low order 
digits and sums all positive results giv- 
ing the high-card point count (H). 
Afterwards, the distribution points for 
all suits longer than 4 cards are added to 
provide the total points (TJ in 
TOTPTS. DIHAN transfers the digits 
to the Y index register, and the two ap- 
propriate alphanumeric segment codes 
for each card are put into DISBUF, us- 
ing indexed addressing. The cards of 
one hand are then displayed, accom- 
panied by pauses and beeps. Arranging 
the cards of a hand into correct bridge 
cequence is performed conveniently by 
the standard subroutine SEQUEN, 
which also serves CHOOSU to deter- 
mine the longest and strongest suit for 
declaring. 

The pseudorandom # generation is 
very crude. SYM has 7 timers built into 
its 4 VIA's, and here one of the 6522' s 
is used together with the 6532 timer. 
The statistics are probably highly ques- 
tionable, but nevertheless RAND, at 
the cost of 6 bytes, seems to give the 
same sort of random hands I get when I 
actually play bridge. A more 
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sophisticated routine can always be 
substituted if desired. FILLPK is 
doubtless very wastehil on time, but 
quite frugal on memory. It merely goes 
round the previous cards selected and 
rejects any valid dio-decimal smaller 
than 3D, which has been selected 
previously. Despite its time inefficien- 
cy, it only takes a iiraction of a second 
to shuffle and deal out the whole deck. 
The rest of the program, apart from the 
deliberately built in delay and pauses, 
is virtually instantaneous. 

The bidding program nms from 
maximum points downwards, 
finishing with no-bid in default of any 
valid bid. Routines for no-trumps, long 
suit, clubs etc., aie used more than 
once. The bidding program should be 
clear from the comments in the listing, 
and the previously mentioned bidding 
criteria. The only aspect which 
possibly warrants any comment is the 
no-trump bidding. 

On the possibly debatable 
hypothesis that a Aralid no-trump call 
takes precedence over others, the 
criteria adopted for no-trumps are the 
three that I mentioned earlier. There is 
at least partial overlapping with some 
of the other routines essential to the 
program, and therefore several different 
possibilities of programming for no- 
trumps. The method I have chosen is 
not necessarily the shortest or best. In 
addition to the short suit tests for voids 
and singletons and doubletons, I have 
employed a test for 15 or 21 high card 
points. No additional tests are 
necessary since 14 liigh-card points, for 
example, together Avith the mandatory 
minimum of 16 total points, indicate at 
least 2 distribution points, and hence 
one 6-card suit, or two five-card suits 
etc. It should be evident that all of 
these are inconsistent with the short 
suit criteria for no-trumps, and hence 
would in any case be invalidated later 
on, on that count. Incidentally, once 
any distribution points are discovered, 
there must obviously be at least one 
biddable suit present. It is then 
superfluous to check for a one club call, 
and so the routine skips LONGSU and 
branches direct to FILLSU. LONGSU is 
the general routine which compares the 
total points with the high-card points. 
If these are equal, there are no distribu- 
tion points, no long suit, and one club 
is called. If they aie unequal, FILLSU 
transfers the longest and strongest suit 
to DISBUF. 

SYM has not been programmed to 
bid the ACOL or Precision systems or 
the like, but simply a homely hybrid of 
amateur conventions. Experienced 



bridge players may be particularly 
shocked that SYM calls one club with 
any good 19 to 21 point hand, and also 
with a large range of hands strong and 
weak containing no long suit, in addi- 
tion to the regular genuine one club 
hand. But all of this can be modified in 
the programming to conform with any 
conventions according to personal 
tastes and individual requirements. 

If desired, the program can be easily 
be altered to continue rovmd all fovir 
hands after valid bids, to redisplay a 
hand, to bid preselected or problem 
hands, and a scoring and timing system 
could be added to increase tension and 
interest. If an extra page or so of RAM is 
available, SYM's onboard 'scope inter- 
face can be exploited to display each 
complete hand much more aesthetical- 
ly, incorporating conventional card 
graphics for the four suits if so desired. 

This routine certainly does not 
cover all eventualities; I don't know 
whether there are any conventions 
which do. The other day SYM's North 
"picked up". Spades— void; Hearts— 
A,K,Q,J,8,7,5,4,2; Diamonds— void; 
Clubs— T, 9, 8, 4: — and naturally 
"l.H." appeared on the display. My 
shouting that this was an obvious four 
or five hearts, or at the very least one 
strong club, in order to keep the bid- 
ding open for one round, was, of 
course, a waste of breath. At least 
nobody screamed back! To obviate 
similar anomalies, it might be worth 
adding bonus distribution points on an 
increasing sliding scale for 8-card suits 
and longer. 

I should like to take this opportuni- 
ty to thank the several experienced 
SYMmers in the United States, 
England, and New Zealand who have 
assisted and encouraged me by cor- 
responding over the past year. I should 
also like to express my appreciation to 
the authors of The Piist Book of KIM. 
Apart from generally acting as a 
stimulating catalyst and leaming tool, I 
have also modified and built upon basic 
ideas contained in their Blackjack, 
Card Dealer and Sort routines. 



Len Green was bom and educated in 
London, has travelled extensively in 
Europe, and now resides in Israel, where 
he has lived for nearly 30 years. He enjoys 
experimenting with his SYM, which he 
purchased in 1978, and he still considers 
himself to be a "newcomer" to hobbyist 
computing. 



I 



JMCAO 



46 



MICRO -The 6502 Journal 



No. 32 -January 1981 



Bad News — Good News 

About MICRO Subscriptions 

The bad news — MICRO must raise subscription rates, to cover increased costs of 
envelopes, postage, and handling. 

The good news — the increase is only $3.00, and the cover price will 
remain unchanged! Subscribers will be saving 25% over single-copy 
purchases. 

More Good News— you can still enjoy MICRO for the next two years 
without a price increase because — MICRO will accept one- and two- 
year subscriptions, or renewals at the present rates until March 15, 
1981! 

Send your order c/o Circulation Department, MICRO, P.O. Box 6502, Chelmsford, MA 01824. 



Type of Subscription 



Rates 



U.S. 

Foreign surface mail 
Centrai America — Air 
South America/Europe — Air 
Other air mail 



Current 

$15.00 
18.00 
27.00 
33.00 
39.00 



New 

$18.00 
21.00 
30.00 
36.00 
42.00 



EXCERT, INCORPORATED 
AIM-65 SYSTEMS 

EXCEPT specializes In AIM-65 System Integration. In addition, we sell Industrial quality power sup- 
plies from Condor, cases from the Enclosures Group, and expansion products from Seawell, MTU, The 
Computerlst, Cubit, Optimal Technology and we Integrate these Items into the exact System YOU want! 
These Systems are completely Assembled and Tested (whenever possible and at no additional charge) and 
Warranteed for six (6) months. All YOU have to do Is plug in the line cord. 



"BASIC" System 



Here are several of the more popular configurations: 

4K AIM w/BASIC A65-4B $510 

Case & Power Supply ENC4 100 

Assembly & Test N/C TOTAL 610 



"A/D" System 


4KAIM 

8 A/D in-2 D/A out, 500 conv/sec 

Cable 

Case & Power Supply 

Assembly & Test 




A65-4 $420 
ADC1 115 
CABLE 25 
ENC5A 129 
N/C TOTAL 689 


"32K" System 
For 


OK AIM 

32K DRAM Plus'-" -EPFOM-I/O 

Cable 

Case & Power Supply 

Assembly & Test 

more Information, call or write for our 

EXCERT, INC 

P.O. Box 8600 

White Bear Lake, MN 

(612)426-4114 


A65-0 $360 
MEB4 395 
CABLE 15 
ENC3A 119 
N/C TOTAL 889 

complete Product Sheet: 
55110 
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Skyles Electric Works 



BASIC Programmer's, Toolkit^®, Disk-0-Pro®, Command-O® 

For PET® Owners Who Want More Fun 
And Fewer Errors with Their Programs 

Here are thirty-five commands you'll need, all on dual chips you can install in two 
minutes without tools, on any PET or PET system. 2KB or 4KB of ROM firmware 
on each chip with a collection of machine language programs available from the 
time you turn on your PET to the time you shut it off. No tape to load or to interfere 
with any running programs. 

For PET/CBM 2001-8, -8N, -16N/B, -32N/B, 3016 and 3032 

BASIC Programmers Toolkit® commands 

AUTO*'' DELETE*'' RENUMBER*" HELP*" TRACE*" 
STEP*" OFF*" APPEND*" DUMP*" FIND*" 

BASIC Programmers Disk-0-Pro® 

CONCATB80 DOPEN^° DCLOSE^^o RECORD^s" HEADER^fio COLLECT^so 

BACKUPB«° C0PYS8° APPEND^" DSAVE^" DLOAD^ao CATALOG««° 

RENAME B80 SCRATCHB80 dIRECT0RY^° INITIALIZERS MERGE^^ EXECUTE^s 

SCROLL*" OUT*" SET*" KILL*" EAT*" PRINT USING^s SEND^^ bEEP^^ 







NOTES: 

ed — a program editing and debugging command 

B80 — a BASIC command also available on Commodore CBM® 8016 and 8032 computers. 
BS — a Skyles Electric Works added value BASIC command. 
BASIC Programmers Toolkit® is a trademark of Paio Alto IC's. 

BASIC Programmers Disk-0-Pro®, Command-O® are trademarks of Skyles Electric Works. 
PET®, CBM® are trademarks of Commodore Business Machines. 
AVAILABLE: USA/CANADA: Please contact your local dealer 
England: Calco Software Lakeside House, Kingston Hill, Surrey KT2 7QT 
GERMANY: Unternehmensberatung, Axel Brocket Lennebergestr 4, 6500 Mainz 
Japan: Systems Formulate, 1-8-17 Yaesu Shinmaki-cho BIdg. IIF Chuo-ku, Tokyo JAPAN 103 
Phone or write for information. Well be delighted to answer any questions 
and to send you the complete information package. 



Skyles Electric Works 



231 E South Whisman Road 
Mountain View, CA 94041 
(415) 965-1735 
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Skyles Electric Works 



BASIC Programmer's, Toolkit®, Disk-0-Pro®, Command-O® 

For CBM® Owners Who Want More Fun 
And Fewer Errors with Their Programs 

Here are nineteen commands you'll need, on a single chip you can install in two 
minutes without tools, on any CBM or CMB system. 4KB of ROM firmware on 
each chip with a collection of machine language programs available from the time 
you turn on your PET to the time you shut it ofif. 

For CBM 8016 and 8032; BASIC 4.0 
BASIC Programmers Command-O® 

AUTO^d DUMP^d DELETE*-^ FIND^" (improved) HELP<^ KILL*** OFF**! 

TRACE^'' (improved) RENUMBER^'^ (improved) INITIALIZERS mERGE^^ MOVERS 

EXECUTE^s SCROLL*'^ OUT«^ SEP<i SEND^s PRINT USING^s bEEP^^ 



100 GOSUB ISO 

105 PRINT USING CS. A. BS 

130 INPUT TIME- , M 

131 INPUT DAY ■, EI 
160 IFB- C THEN 105 
1B0 FOB X ITO!) 

183 PRINT Y(X) NEXT 
1S4 RETURN 
200 I.X,19 
READY 

RENUMBER 110. 10. 105-184 

READY 

LIST 
100 GOSUB 150 
110 PRINT USING C$, A, BS 
120 INPUT "TIME ', D$ 
130 INPUT DAY' , Et 
140 IFB C THEN 110 
150 FOR X IT09 
160 PRINT Y(X) NEXT 
170 RETURN 
200 I X;i9 

READY 



MERGE D1 "Buy NOW" 

SEARCHING FOR BUY NOW- 
LOADING 

READY 
RENUMBER 100. tO 

READY 

FIND BX 

110 PRINT USING A$. jE. j3 . c$ . OS 

280 33 "NOW IS THE TIME" 



S80 BA BA 1 

590 RA 123-5X92 -BA-IO 

600 IF BA 143 THEN 580 

610 RETURN 

620 C$ "PROFITS*. »•«.•!» OAILV 

630 PRINT USING C$. PI 

640 D$ "LOSS $».«»«»» DAILY" 

650 PRINT USING DS. II 



PROFIT Jl. 238,61 DAILY 
LOSS $ 00 DAILY 



NOTICE 

When you order Command-O, we will loan 
you a Toolkit until we deliver Command-O. 

NOTICE 



PRICES: 



BASIC Programmers Toolkit® (chip only) 
BASIC Programmers Dlsk-O-Pro® (chip only) 
BASIC Programmers Command-O® (chip only) 
Interface boards (needed sometimes) 
Instruction Manual (with redeemable $5.00 coupon) 



$40.00 

$75.00 

$75.00 

$20.00-$50.00 

$5.00 



Shipping and handling $2.50 USA/Canada, $10.00 Europe/Asia 
California residents please add 6% or 6-112% sales tax as required 
Resen/e your Dlsk-O-Pm, Command-O today 
Toolldt® immediate delivery, Disl<-0-Pro delivery in December, Command-O delivery in January 
VISA, MASTERCHARGE ORDERS CALL (800) 538-3083 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (408) 257-9140 



jSkylcs Electric Works 



231 £ South Whisman Road 
Mountain View, CA 94041 
(415) 965-1735 . 
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The Most Powerful Disk-Based 
Macro Assembler/Text Editor 
Available at ANY Price 



Now includes the Simplified Text Processor (STP) 

For 32K PET, disk 48K APPLE II 

3.0 or 4.0 ROMS or —OR— or APPLE II + 
8032 (specify) and DISK II 

MAE FEATURES 

— Control Files lor Assembling Multiple named source files 
from disk 

— Sorted Symbol table — up to 31 chars./label 

— 27 Commands, 26 Pseudo-ops, 39 Error Codes 

— Macros, Conditional Assembly, and a new feature we developed 
called Interactive Assembly 

— Relocatable Object Code 

— String search and replace, move, copy, automatic line 
numbering, etc. 

STP FEATURES 

— 17 text processing macros 

— Right and left justification 

— Variable page lengths and widths 

— Document size limited only by disk capacity 

— Software lower case provision for APPLE II without lower 
case modification 

ALSO INCLUDED 

— Relocating Loader 

— Sweet 16 macro library for APPLE and PET 

— Machine Language macro library 

— Sample files for Assembly and text processing 

— Separate manuals for both APPLE and PET 

PRICE 

— MAE, STP, Relocating Loader, Library files, SO page manual, 
diskette — $169.95 

SEND FOR FREE DETAILED SPEC SHEET 

EASTERN HOUSE SOFTWARE 

3239 LINDA DRIVE 
WINSTON-SALEM, N. C. 27106 



(919) 924-2889 



(919) 748-8446 



THE MAILING LABEL AND FILING SYSTEM 



From Avant-Garde Creations 



only $24.95 ppd. 



This unique system will handle both your tiling needs and your 
mailing label needs. 

It's uniqueness starts with user-determined variables (up to 10 
options) and continues with a special COUNT/SORT routine that 
allows the user to sort up to 9 VALUES for each of any 9 (out of 18) 
variables. It will print mailing labels, do a regular print-out or 
just display the criteria-meeting records while it coimts them. It 
will also range-sort for 3 particvdar variables. 

It makes an alphabetized directory of names and record numbers. 
You can find records by name or by numbers in seconds. If you 
don't know the exact spelling there's a quick-find option for directory- 
reading. 

You can customize your labels and print up to 6 lines of your 
variables on them. 

It includes special quick-copy and backup programs. 

An easy to use system, brimming with options and dynamics, 
which ends the need for separate filing and mailing label programs. 

Includes 40-page program manual and disk. APPLE 11 PLUS, 
48K, one or two disk drives. 



$24.95 ppd. 

We accept VISA/Mastercharge 

Write for our detailed brochure 
and more information: 

Avant-Garde Creations 

P.O. Box 30161 

Eugene. OR 97403 

Dept. m 



THEMAMINCLABEL 

AND 

MJNGSYS7EW 



APPLE (1 PLUS, UX 



Winchester Backup 

ALLOY offers COST-EFFECTIVE Tape Sub-systems boasting File-Oriented 
Backup. Using this technique, a Maintenance backup need only contain Active or 
Changed Files. Furthermore, a single file may be restored without disturbing other 
modified files. The Cartridge-Tape products support the "FUNNEL" 6400 bpl 
product by Data Electronics (DEI). The 9-TRACK products support most Industry 
Compatible Formatted tape units including the new Cipher Microstreamer. 

Cartridge-Tape Subsystems with up to 13.4 
Mbytes are available for: 

• Data General mIcroNOVA and NOVA 

• Ohio Scientific Challenger C2/C3 

• S-100 under both CP/M™ & MP/M 

• Intel Multibus under ISIS 

• Z-80 processor piggy-back 5" x 5" 

• General Purpose RS-232 & PARALLEL 

9-Track Tape Subsystems with up to 45 
Mbytes are available for: 

• Ohio Scientific Challenger C2/C3 



• S-100 under both CP/M 



TM 



&MP/M 

ENGINEERING 




MLLU T COMPANY, INC. 

Computer Products Division 



85 Speen Street 
Framingham, MA 01701 
(617)620-1710 
TWX: 710-380-7624 
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PET Vet 



By Loren Wright 



Update on the VIC 

I had expected to have a VIC prototype 
in time for this month's column. I am 
assured by Commodore, however, that 
I will have one in time for February's 
PET Vet. Meanwhile, I have learned a 
few additional details. The price is 
$299.95, which includes 3.8K of user 
RAM and a cable for a monitor, but not 
the TV modulator. The primary 
method of memory expansion is with a 
plug-in cartridge, containing 3K of 
RAM and sockets for two 2716-type 
ROMs. These cartridges will be 
available to independent software 
houses, so that they can produce their 
own plug-in program cartridges for the 
VIC. The second method of expanding 
is through a master control board, 
which can accept 3K, 8K, or 16K RAM 
expansion modules, other plug-in 
programs, or special cards, such as a 
planned IEEE-488 interface. 

The VIC, unlike the PET and CBM 
machines, has a serial bus, and for this 
Commodore will sell a serial version of 
the CBM 2031 single floppy disk drive, 
and a serial printer. Other peripherals 
for the VIC will be offered later, but to 
use any of the existing parallel devices, 
the IEEE-488 card is required. 

The official release of the VIC will 
coincide with the Consumer Elec- 
tronics Show in Las Vegas in January, 
1981. 

Finding BASIC Variables 

Finding a BASIC variable is quite 
simple using a routine that already 
exists in the PET's BASIC ROMs. Two 
zero-page locations are used to store the 
name of the variable, and the routine 
returns the address of that variable in 
the next two locations. The two ad- 
dresses for the name are set up with the 
ASCII codes for the characters. If the 
name doesn't have a second character, 
then is entered. In addition, though, 
string variables have $80 ORed into the 
second address, and integer variables 
have $80 ORed into both locations. 



Examples: 

Variable VARNAM VARNAM+1 

X $58 $00 

L$ $4C $80 

AB $41 $42 

Dl% $C4 $B1 



Floating point variables are stored in a 
special 7-byte memory format— the 
name in two bytes, as above, the expo- 
nent, and four mantissa bytes. Integer 
variables reserve the same seven bytes, 
but only use the first four—two for the 
name and two for the integer in high, 
low order. Strings are actually stored in 
high memory, but in low memory 
seven bytes are reserved, of which five 
are used. The name occupies two bytes, 
followed by the leiigth of the string, 
and the starting adchess (low, high) of 
the actual string in high memory. 

BASIC ROM Version 





2.0 


3.0 


4.0 


VARNAM 


$94 


$42 


$42 


VARNAM -1- 1 


$95 


$43 


$43 


VRADLO 


$96 


$44 


$44 


VRADHI 


$97 


$45 


$45 


Primary FAC 


$B0-$B5 


$5E-$63 


$5E-$63 


FNDVAR 


$CFD7 


$CFC9 


$C187 


MEMFAC 


$DA74 


$DAAE 


$CCD8 


FACINT 


$D0A7 


$D09A 


$C2EA 



If VARNAM and VARNAM -i- 1 are 
set up properly, a call to FNDVAR will 
return with the address of that variable 
in VRADLO, VRADM. This address is 
also in the accumulator (low) and Y 
register (high), so in the case of a 
floating point variable, an immediate 
call of MEMFAC will move the number 
to the primary FAC (floating point ac- 
cumulator). The conversion from 
memory format to FAC format is made 
on the way. A call to FACINT will con- 
vert the FAC to an integer m the fourth 
and fifth bytes ($B3,$B4 or $61,$62 in 
high, low order). 



The address indicated by 
VARADR,VARADR+1 is actually the 
location of the first byte after the name 
portion of the entry. With an integer 
variable, this address will contain the 
high byte of the integer value, but with 
a string variable, it will contain the 
length of the string, irhe next two bytes 
contain the actual address of the string 
in high memory. The following routine 
will copy the found string to memory 
starting at address XXXX (whatever 
you choose). Suggested locations for 
ADLO,ADHI are $32,$33 (BASIC 3.0 
and 4.0) and $71, $72 (2.0). 



LDY #$02 

LDA (VRADLO),Y The third byte 
STAADHI 
DEY 

LDA (VRADLO),Y The second 
STA ADLO 
DEY 

LDA (VRADLO),Y The first— iength 
TAY 
LOOP LDA (ADLO),Y 
STA XXXX,Y 
DEY 
BNE LOOP 

Now that you know how to find BASIC 
variables, what do you do with them? 
Well, a typical application is in a plot- 
ting program where the only variables 
of concern might be X and Y. The 
BASIC program might have a 
FOR... NEXT loop on X, with Y 
calculated within the loop, followed by 
a SYS call to your routine which finds X 
and Y and then processes them for plot- 
ting on the screen. 

If you know where the variables are, 
that means you can change them 
(carefully) without disturbing BASIC. 
All kinds of fancy string manipulations 
come to mind. Not only can the 
characters be changed, but also the 
lengths, names, and locations. 

I have two additions to my column 
on documentation (MICRO 
29:39)— Library of PET Subioutines 
and The PET Revealed, both by Nick 
Hampshire, $19.95 each. These have 
been available in the United Kingdom 
and by mail for quite a while, but now 
Commodore has "officially approved" 
them and plans to sell them through its 
dealers in the U.S. 

The PET Revealed is a well- 
organized collection of interesting and 
important information on the inner 
workings of the PET. The five general 
sections are: (I) The PET System Hard- 
ware, (2) The 6502 Microprocessor, (3) 
The PET Operating System, (4) The 
User Port, and (5) The IEEE Port and 
the 6520. Complete schematics, 
memory maps, BASIC subroutines, 
BASIC tokens, and lots of other charts 
and tables are included. Also included 
is a number of special application cir- 
cuits and routines. This is a very useful 
book for anyone wanting to go beyond 
BASIC. 

Libtaiy of PET Subioutines is a col- 
lection of common routines in BASIC 
and assembly language. A general- 
purpose screen handler, random-access 
disk file management, and several sort 
programs are examples. Anyone 
wishing to take on a major program- 
ming project, without starting from 
scratch, should appreciate this book. 
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OK-LIKE SYSTEMS 

PRESENTS 

HI-RES FOOTBAEE 

By JAY SULLIVAIV And KEIX WILLIAMS 



This is the football gome you always 
thought your Apple was capable of, but 
no one seemed able to deliver! 

Of course, Hi-Res Football portrays the 
field and players in fj^^^rnoted Hi-Res 
Grophics, but do n<&j^^use it with 
football gorTie|<t3Ff~tlS^3B^fiute variety. 
This gome cap|yres m^mat^l aspects 

coach 
clock 
dticol 
Ifield 

OS 

Kid 
^bur 
fsomehime trying to 
It is impossible 
>lings one gets 
Complete that two 
or on defense 
quarterback on third 
visit a computer store 
'ea to request a demonstration. 
Thank you. 
RunTon any 46K Apple II or II Plus, DOS 
3.2 or 0.3. Avolloble now for $39.95 on 
disk from your local computer store or you 
may order directly from: 

ON-LINE SYSTEMS 

36575 Mudge Ranch Rood 

Coorsegold, CA 93614 

209-683-6858 

ORDERS MAY DE CHECK, VISA, MASTER CHARGE OR C.O.D. 



of on actual 
yout coll the 
to your odva 
fourth 

posit/3A 
quarter^ 

the defens 
receiver a 
"Poke Out" 
to describ^ 
when youij 
minute 
when y 
and go^ 
In yoi 





Find Your Way Around 
The New Apple' DOS 
With The DaklnS' 
Programming Aids 3.3' 



I 



DakinS Corporation, a Colorado soft- 
ware house, is making available to the 
public 12 utility programs on one 16 
sector diskette, utilizing the new 
Apple DOS 3.3, which provides 23% 
more storage. 

All of the DakinS Programming 
Aids 3.3 programs are also compat- 
ible with the Corvus Disk Drive 
system. 
Features 

• Remove REM statements, unref- 
erenced (dead) code, and com- 
press code to increase program 
speed and save memory anddisk 
space. 

• Copy any file or program from 
one diskette to another. Only the 
name is needed. 

• Print or display a line cross refer- 
ence and variable name cross 
reference. 

• Print or display all or selected 
records from a text file. 

• Display any sector of a given file 
or program, and then update any 
data within that seaor, or specify 
the sector you wish to update, 
such as directory sectors and sec- 
tors occupied by DOS. 

Apple is a registered trademark of Apple 
Computer Inc. Tfie Controller is a registered 
trademark of DakinS Corporation. 



• Create, print and modify your 
own text and Exec files. 

• Perform 20-digit arithmetic. 

• Copy a diskette without DOS: 
initialize without DOS; verify 
source diskette; verify copied 
data is the same as the original. 

• Use a powerful data entry routine 
that handles both string and nu- 
meric data. 

Plus Many More Utility Programs 
ior Sophisticated Programmers 

Many of these utility programs have 
been developed and tested for in- 
house use while producing The Con- 
troller™ business package for Apple 
Computer Inc. 

Each programming aids package 
includes a program diskette and very 
complete documentation, all attrac- 
tively packaged in a padded, blue 
print vinyl 3-hole notebook with sil- 
ver lettering. An identifying tab sepa- 
rates each program for convenient 
reference. 

See your Apple dealer or contact 
DakinS Corporation, P.O. Box 21187, 
Denver, Colo. 80221. Telephone: 800- 
S2S-0463. VISA or MC welcome. 

DakinS 



JJecision 
Oystems 



Decision Systems 

P.O. Box 130M 
Denton, TX 7S203 



SOFTWARE FOR THE APPLE II* 

ISAM-DS is an integrated set of Applesott routines that gives indexed lile capabilities 
1.D your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that match 
products costing twice as much, 
$50 Disk, Applesoft, 

PBASIC-DS is a sophisticated preprocessor for structured BASIC, Use advanced 
logic constructs such as IF,,, ELSE,.., CASE, SELECT, and many more. Develop 
programs for Integer or Applesoft, Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 
$3S. Disk, Applesoft (48K, ROM or Language Cardl. 

DSA-OS is a disassembler for 6602 code. Now you can easily dis-assemble any 
machine language program for the Apple and use the dis-assembled code directly as 
input to your assembler, Dis-assembles instructions and data. Produces code com- 
patible with the S-C Assembler (version 4.01, Apple's Toolkit assembler and others, 
$25 Disk, Applesoft (32K, ROM or Language Cardl, 

FORM-DS is a complete system for the definition of input and output froms, FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features, 
$25 Disk. Applesoft (32K, ROM or Language Cardl, 

UTIL-DS is a set of routines lor use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft's CLEAR gets everythingl. improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs, 
$26 Disk, Applesoft, 

SPEED-DS IS a routine to modify the statement linkage in an Applesoft program to 
speed its execution, improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need for 
garbage clean-up. Author: Lee Meador, 
S16 Disk, Applesoft I32K, ROM or Language Card), 



lAdd $4.00 for Foreign Malll 
'Apple II is a registered trademark of the Apple Computer Ci, 
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Make a Clear Plastic Cover 

For 
Your Apple 



E.J. Neiburger, D.D.S. 
1000 North Avenue 
Waukegan, Illinois 60085 



Your APPLE has a cover which, if 
removed, will allow you access to the 
boards and chips located on the mother 
board. What I describe below is a 
simple project that will create a clear 
plastic, duplicate cover that will 
protect your APPLE'S innards— yet 
allow the curious to look in. 

Buy a clear sheet of V* thick 
window plastic (for example, Lexan) 
from your local hardware store. You 
will need an 11%- by 13-inch piece. 
Place the plastic on two 12-inch 
sections of IVi-inch square wood so 
that 5 inches of the plastic extends over 
the edge (see figures 1 and 2). 

Heat evenly with a blowtorch until 
the plastic begins to sag. Push the 
5-inch section down until it contacts 
the table surface and hold until cool. 
Heat the plastic gradually to avoid 
bubbling or yellowing. 

Glue two plastic blocks (1- X Vi- X 
V4-inch) to the back edge of the plastic, 
approximately 2 inches from either 
side. Attach self-adhesive fasteners, as 
seen on the APPLE cover and .... 

Watch while you are computing! 



Ellis "Skip" Neiburger is a practicing 
dentist. Editor of the Dental Computei 
Newsletter, Contributing Editor for the 
Physician's Micro Computer report and 
author of several computer science 
articles. He is director of Andent Inc., a 
computer applications firm. His interests 
involve the use of microcomputers in 
medical-dental treatment, robot systems, 
and practical real-world applications. 
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SUPER inupsion 

• Super Invasion is the original invasion game, with the original 
moon creatures and faster action than any other invasion game. 

• Features superb high resolution graphics, nail-biting tension and 
hilarious antics by the moon creatures! 

• Self-running "attract mode" of operation for easy learning and , i i 
demonstrating of the game. ^ 

" As good m every way as the famous Invaders arcade game. L 



High speed action ! • Sound effects! 
Runs on the Apple II and the Apple II Plus 



««»«« 



Fifty-five aliens advance and shower you with lethal writhing 
electric worms. As you pick off the aliens, one-by-one, they 
quicl<en their descent. They whiz across the screen wearing away 
your parapets, your only defense, coming closer and closer to 
your level. Super Invasion is the original invasion game with the 
original moon creatures and faster action than any other invasion 
game on the market. 

Super Invasion is available for only $19.95 on cassette 
(CS-4006) for a 32K Apple II. Space War is $14.95 on cassette 
(CS-4009) for a 16K Apple II Space War and Super Invasion are on 
one disk (CS-4508) for a 48K Apple II for only $29.95. 

Send payment plus $1 00 shipping and handling to Creative 
Computing Software, P.O. Box 789-M, Morristown, NJ 07960. NJ 
residents add $1.00 sales tax, Bankcard orders may be called in 
toll free to 800/631-81 12, In NJ call 201 /540-0445. 



soRsatioRal 
software 
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IS TERRIFIC 

(Fop Your Apple) 




: The Reference for Apple computing! 



MBBLE IS: One of the Fastest Growing new Magazines in 
the Personal Computing Field. 



t: Providing Comprehensive, Useful and 
Instructive Projp-ams for the Home, Small Business, and 
Entertainment. 



I: A Reference to Graphics, Games, Systems 
Programming Tips, Product News and Reviews, Hardware 
Construction Projects, and a host of other features. 



\: A magazine suitable for both the Beginner and 
the Advanced Programmer. 

Each issue of NIBBLE features significant new Ftograms of Commercial Quality. Here's 
what some of our Readers say: 

- "Certainly the best magazine on the Apple 11" 

- "Programs remarkably easy to enter" 

- "Stimulating and Informative; So much so that this is the first computer magazine I've 
subscribed to!" 

- "Impressed with the quality and content." 

- "NIBBLE IS TERRIFIC!" 

In coming issues, look for: 

D Numeric Keypad Construction Lab D Assembly Language Programming Column 
n Pascal Programming Column D Data Base Programs for Home and Business 
D Personal Investment Analysis D Electronic Secretary for Time Management 
D The GIZMO Business Simulation Game 

And many many more! 

NIBBLE is focused completely 
on the Apple Computer systems. 

Buy NIBBLE through your local 
Apple Dealer or subscribe now with 
the coupon below. 

TpyaHBHi! 



NOTE; 

FicM Clisi or Air Mail is required for all APO, FPO ami all foreign addresses 

with the following additional amounts. 

— USA. Canada. Mexico, APO. FPO$7.50 
— Central and South America S9 00 

— Europe {12.00 

— Asia and elsewhere SIS. 00 

©19110 by MICRO-SPARC. INC.. Lincoln. Mass OI77.V All rights reserved. 
•Apple II is a registered trademark of Apple Computer Company 



nibble 



No. 4 



Box 325, Uncoil), MA. 01773 (617) 259-9710 

I'll try nibblel 

Enclosed Is my $17.50 (for one yeai)L 

D check u money order 

(Please allow 4 to 6 weeks for delivery of I st issue) 
BACK ISSUES of NIBBLE are available for 
$2.00 + .50 postage and handling. 

Name 



Address.. 

City 

State 



Zip_ 
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SYSTEMSX 



DCS 1 ocn aJS S 



Appletizjng software for the Apple 




(TM) 



For kids of all ages 



Quiz Master 

Quiz Master is a series of multiple choice 
question answer diskettes on selected subjects. 
Each diskette is full and has approximately 1000 
questions on the specified subject. The first two 
disks are Movie trivia and Computer terminology. 

The program that accesses the massive text 
file containing the questions and answers is 
designed so that you WILL learn about the subject. 
This is accomplished by requiring you to try 
another answer, if you miss a question, until you 
get it right. This way, you will know the correct 
answer before you continue to the next question. 

The operation of the program is very simple. 
First you are asked which question you would like 
to start with. When the question session starts, 
the number of correct and wrong answers is 
continuously displayed along with the percentage. 
This way you will always know how well you are 
doing. When you are tired and wish to end the 
session, you will be given the option to review 
the questions that you missed. 

This system has been found to be a quick and 
easy way to learn about the subject matter. 

Future offerings may be Star Trek, History, 
Science and a multitued of other topics. 

Requirements: 16K Apple II or II Plus and Disk. 
Retail Price: Movie Trivia $12.95 

Computer Tutor $12.95 



Hangman 

This program is the old traditional hangman 
game that we used to play as kids, with a pencil 
and paper. The big difference here is that the 
computer will choose the word from a text file 
that comes with over 450 words. You have the 
capability of changing any of the words or adding 
new words to the existing file. You also have the 
capability of starting new files and then choosing 
which file you wish the computer to get the words 
from. This is ideal for parents to put their 
childrens spelling words into separate files and 
then let the kids have a ball while learning how 
to spell them. 

If you are not familiar with the hangman game, 
here is how it works. The computer chooses a word 
at random from the file. The computer then puts a 
gallows on the screen in LO-RES graphics with a 
line of dashes at the bottom, one dash for each 
letter of the word that has been chosen. You now 
try to guecs the wore by guessing one letter at a 
tin.e. If the letter is right, that letter replaces 
the corresponding dash on the screen. If the 
letter is wrong, you will get a raspberry sound 
and a part of the body is displayed on the 
gallows. You can have up to 8 wrong guesses, at 
which time the entire body is standing on the 
floor of the gallows. On the 9th wrong guess, you 
get a big raspberry sound, the floor hinges down 
and then the rope and your neck stretches. The 
word is then displayed with the file reference 
number. If you get the word right before the 9th 
wrong guess you are a winner. In both cases, you 
simply hit the space bar and the computer chooses 
another word to start all over again. 

Requirements: 32K Apple or II Plus and Disk. 
^Retail Price: $14.95 



For 6502 assembly users 



DISASM/65 

A Lisa compatible disassembler for the 
Apple II or Apple II Plus. Disasm/65 
generates a symbolic disassembled listing of 
a machine code program which can be 
reassembled using Lisa 2.0 or Lisa 1,5, Now 
Lisa uses can patch and/or modify systems 
such as DOS, Pascal, Basic and the Apple 
monitor, Disasm/65 can also be used to 
relocate machine language programs. 

Disasm/65 handles instructions, Hex data, 
string data, address data and stack address 
data. This allows the user to correctly 
disassemble any code segment. Disasra/65 lets 
the user input the disassembly parameters, 
thus avoiding undefined instruction sequences 
encountered while using the mini-disassembler 
found in the Apple Monitor. 

Requirements: 48K Apple II or II Plus s Disk. 
Retail price $24.95 



XREF/65 

A cross reference program for LISA 1.5 & 
LISA 2.0. A cross-reference is vital for 
program development, documentation and 
debugging. XREF/6 5 lists all lables defined 
in a program. The line # where the lable is 
defined, and the line # of each occurrence of 
the lable within the program, XREF/65 also 
prints out an OPCODE frequency map for the 
program so that the user can see which 
OPCODES are used most frequently. The LISA 
2,0 source listing for XREF/65 is provided as 
part of the package, 

+PLUS on the same diskette: 

SORT 2.0 (source included) sorts, 
aphabetically and numerically, LISA 2.0 
symbol tables and prints the symbol table in 
an 80-column format. 

+PLUS 

SC TO LISA (source included) converts SC 
Assembler II V3.2 files to LISA. Now SCASM 
II owners can easily upgrade to the more 
powerful LISA assembler. 

Requirements: 48K Afple II or II Plus & Disk. 
Retail Price: $19.95 



ORDER FROM: 



A SYSTEMSX 

P.O.Box 55518 
Riverside, Calif, 



92517 



We gladly accept Mastercard and Visa, Please 
Include card 4, Expiration date & Signature. 
California residents add 6% sales tax. 
All U.S.A. orders add $2.00 for S £. H. 
Outside U,S.A. orders add $15,00 for S & H. 
Please allow two weeks for personal or 
business check to clear. 

Dealer inquiries invited. 
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Searching 
String Arrays 



This machine ianguage program 
mai(es searching a iarge string 
array considerably faster and 
easier. 



Gary B. Little 

#101-2044 West Third Avenue 
Vancouver, British Colunnbia 
Canada V6J 1 L5 



Have you Apple users ever wanted to 
search through a string array to see if it 
contains a particular phrase? If you 
have, it's probable that you have writ- 
ten a rather short loop routine in 
Applesoft to do this. However, if you 
have a few thousand comparisons to 
make, the Applesoft version may take 
an undesirable length of time to grind 
out the desired results. 

A much faster search can be carried 
out on the Apple LT by using a search 
routine written in 6502 assembly 
language. Such a program is shown 
below. 



To understand exactly how the pro- 
gram works it is necessary to analyze 
the method by which the Apple stores 
variables in its memory. The details are 
found on page 137 of the Applesoft II 
Basic Piogiamming Reference Manual. 
For a one-dimensional string array, the 
storage pattern is as follows: 

NAME (2 bytes) 

OFFSET pointer to next variable 

(2 bytes) 
No. of dimensions (1 byte) 
Size 1st dimension (2 bytes) 
String$(0)— length (1 byte) 

— adcress low (1 byte) 
— address high (1 byte) 



String$(N) (3 bytes) 



N is the size of the 1st dimension. If the 
string array is the first array variable 
defined in a program, the memory loca- 
tion of the first byte of the trio of bytes, 
reserved for the Cth ;irray variable, is 
given by PEEK(107] + 256*PEEK(108) 
+ 7 + 3'C (where =C -N).This 



is because the pointer to the beginning 
of the array space, and also to the begin- 
ning of the string array variable map, is 
found at $6B,$6C (107,108) and there 
are 7 + 3*C bytes before the three Cth 
array variable bytes. 

If the phrase to be searched for (the 
search variable) is the first simple 
variable defined in a program, the 
memory location of the first byte of the 
three bytes reserved for the length and 
location of the string is given by 
PEEK(105) + 256*PEEK(106) + 2. 
This is because the pointer to the 
begirming of the simple variable space, 
and also to the begirming of the simple 
variable map, is found at $69,$6A 
(105,106). There are two bytes before 
the three variable bytes. 

To carry out the search, it is simply 
necessary to compare the string pointed 
to by SV + 3,SV + 4 (where 
SV = PEEK(105) + 256*PEEK(106)) 
with the string pointed to by AV -t- 8 + 
3*C,AV + 9 + 3*C [where 
AV-PEEK(107) + 256*PEEK(108) and 
C runs from to N) . This is precisely 
what is done in this assembly language 
routine. 









LENS 


EQU 


$0 


LENGTH OF SEARCH PHRASE 








LENR 


EQU 


$1 


LENGTH OF STRING ARRAY VARIABLE 








SP 


EQU 


$6 


POINTER TO SEARCH PHRASE 








RP 


EQU 


$8 


POINTER TO ARRAY VARIABLE TABLE 








RL 


EQU 


$1A 


POINTER TO ARRAY VARIABLE 








NL 


EQU 


$1C 


ENDING ARRAY NUMBER 








CL 


EQU 


$1E 


STARTING ARRAY NUMBER (AND COUNTER) 








SAVE 


EQU 


$FF4A 


SAVE REGISTERS 








RESTORE 


EQU 
ORG 


$FF3F 
$300 


RESTORE REGISTERS 


0300: 


20 


4A FF 




JSR 


SAVE 


SAVE REGISTERS 


0303: 


AO 


00 


LOOP 


LDY 


#$00 




0305: 


Bl 


08 




LDA 


(RP),Y 


GET LENGTH OF VARIABLE 


0307: 


85 


01 




STA 


LENR 


AND STORE 


0309: 


C8 






INY 






030A: 


Bl 


08 




LDA 


(RP),Y 


GET POINTER (LO) (continued) 
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030C: 


85 


lA 




STA 


RL 


AND SAVE 


030E: 


C8 






INY 






030F: 


Bl 


08 




LDA 


(RP).Y 


GET POINTER (HI) 


0311: 


85 


IB 




STA 


RL+1 


AND SAVE 


0313: 


A5 


01 




LDA 


LENR 


IF LENGTH OF SEARCH 


0315: 


C5 


00 




CMP 


LENS 


PHRASE EXCEEDS LENGTH 


0317: 


30 


OF 




BMI 


NOPE 


OF VARIABLE, SEARCH FAILS 


0319: 


AO 


00 




LDY 


#$00 




031B: 


Bl 


06 


AGAIN 


LDA 


(SP),Y 


COMPARE THE PHRASES 


031D: 


Dl 


lA 




CMP 


(RL),Y 


LETTER BY LETTER 


031F: 


DO 


07 




BNE 


NOPE 


FAILS IF NOT EQUAL 


0321: 


C8 






INY 






0322: 


C4 


00 




CPY 


LENS 




0324: 


FO 


10 




BEQ 


RTSl 


SUCCESS! 


0326: 


DO 


F3 




BNE 


AGAIN 




0328: 


A5 


IE 


NOPE 


LDA 


CL 


COMPARE COUNTER 


032A: 


C5 


IC 




CMP 


NL 


TO ENDING ARRAY NUMBER 


032C: 


DO 


OB 




BNE 


LOOPl 




032E: 


A5 


IF 




LDA 


CL+1 




0330: 


C5 


ID 




CMP 


NL+1 




0332: 


DO 


05 




BNE 


LOOPl 


DONE IF EQUAL 


0334: 


E6 


IF 




INC 


CL+1 




0336: 


4C 


3F FF 


RTSl 


JMP 


RESTORE 




0339: 


18 




LOOPl 


CLC 






033A: 


A5 


08 




LDA 


RP 


SET POINTER TO NEXT 


033C: 


69 


03 




ADC 


#$03 


TRIO OF ARRAY BYTES 


033E: 


90 


02 




BCC 


Nl 




0340: 


E6 


09 




INC 


RP+1 




0342: 


85 


08 


Nl 


STA 


RP 




0344: 


18 






CLC 






0345: 


A5 


IE 




LDA 


CL 


INCREMENT COUNTER 


0347: 


69 


01 




ADC 


#$01 




0349: 


90 


02 




BCC 


N2 




034B: 


E6 


IF 




INC 


CL+1 




034D: 


85 


IE 


N2 


STA 


CL 




3 4F: 


38 






SEC 






0350: 


BO 


Bl 




BCS 


LOOP 


CHECK NEXT ARRAY VARIABLE 



« 



The time savings that can be real- 
ized by using the routine can be seen by 
running the Applesoft demo program 
that is LISTed below. For example, an 
assembly language search of 2,000 
string array variables takes only one 
second, whereas the same search done 
in Applesoft takes 19 seconds! 



To use the search routine from 
within an Applesoft program, the 
following procedure must be followed: 

1. POKE the length of, and the two 
pointers to, the search phrase into 
locations 0,6,7, respectively. This is 
done in line #210 of the demo 
program. 

2. POKE the number of the array 
variable from which the search is to 
proceed ('C') in locations 30,31 
(low, high). This is done in line 
#220. 



100 S$ = "": REM MUST BE FIRST 

DEFINED SIMPLE VARIABLE 
110 N = 2000: DIM R$(N): REM MUST 
BE FIRST DEFINED ARRAY 

VARIABLE 
120 GO'SUB 1000: REM LOAD SEARCH 

ROUTINE 
130 DEF FN MD(X) = X - 256 * INT 

(X / 25 6) 
140 TEXT : HOME : PRINT TAB( 8) 

; : INVERSE : PRINT "STRING A 

RRAY SEARCH DEMO": NORMAL 
150 PRINT : PRINT "RANDOM STRING 

S:": PRINT 
160 FOR I = 1 TO N:R$(I) = CHR$ 

(65 + 2 6 * RND (1)) + CHR$ 

(65 + 26 * RND (1)): PRINT 

R$(I);" ";: NEXT I: PRINT : PRINT 
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170 INPUT "ENTER SEARCH STRING: 

";S$: PRINT 
180 SV = AV:C = 1 
190 SV = PEEK (105) + 256 * PEEK 

(106) 
200 AV = PEEK (107) + 256 * PEEK 

(108) 
210 POKE 0, PEEK (SV + 2): POKE 

6, PEEK (SV + 3): POKE 7, PEEK 

(SV + 4) 
220 POKE 30, FN MD(C): POKE 31, INT 

(C / 256) 
230 POKE 28, FN MD(N): POKE 29, INT 

(N / 256) 
240 POKE 8, FN MD(AV + 7 + 3 * C 

): POKE 9, INT ((AV + 7 + 3 * 

C) / 256) 
250 CALL 768 
260 C = PEEK (30) + 256 * PEEK 

(31) 
270 IF C > N THEN 300 
280 PRINT S$;" MATCHES #";C;" (P 

HRASE: ";R$(C);")" 
290 C=C+1:IFC< =N THEN 1 

90 
300 PRINT : PRINT "MACHINE LANGU 

AGE SEARCH COMPLETED" 
310 PRINT : INPUT "PRESS 'RETURN 

' FOR APPLESOFT SEARCH: ";A$ 

: PRINT 
320 FOR I = 1 TO N 
330 IF S$ = LEFT$ (R$(I), LEN ( 

S$)) THEN PRINT S$;" MATCHE 

S #";I;" (PHRASE: ";R$(I);") 

340 NEXT I: PRINT : PRINT "APPLE 
SOFT SEARCH COMPLETED": END 

1000 FOR I = 768 TO 849: READ X: 

POKE I,X: NEXT I: RETURN 
1010 DATA 32,74,255,160,0,177,8, 

13 3,1,200,177,8,133,26,200,1 

77,8,133,27,165,1,197,0,48,1 

5, 160,0,177,6,209 
1020 DATA 26,208,7,200,196,0,240 

,16,2 08,2 43,165,30,197,28,2 

8,11,165,31,197,29,208,5,230 

,31,76,63,255,24,165,8 
1030 DATA 105,3,144,2,230,9,133, 

8,24,165,30,105,1,144,2,2 30, 

31,133,30,56,176,177 



3. POKE the number of the airay 
variable, at which the search is to 
end, ('N'l in locations 28,29 
(low, high). This is done in line 
#230. 

4. POKE the location of the trio of 
bytes for the Cth axray variable in 
locations 8,9 (low, high). This is 
done in line #240. 

5. CALL 768 to start the assembly 
language search routine. When con- 
trol retiuns to Applesoft the array 
number that has satisfied the search 
will be returned in locations 30,31. 
If PEEK[30J + 256*PEEK(31) is 
greater than N, then the search has 
failed. If not, then a match has been 
made with R$(C) where 
C = PEEK(30) + 256*PEEK(31) and 
R$ is the array that is being 
searched. 

6. To continue the search to the end of 
the array, increment C and repeat 
the above process. 

The routine, as written, does not 
search for exact matches with the 
string anay variables. If the leftmost 
part of a string array variable is the 
same as the search phrase, a match is 
considered to have occurred. 

A useful application of this search 
routine is to use it in conjunction with 
a mailing list database program. In this 
way, the search time for an individual 
record can be cut down dramatically. 



Gary B. Little first became interested in 
computers by writing data analysis pro- 
grams in FORTRAN on an IBM 370/168 for 
an M.S. degree in Physical Chemistry 
(Microwave Spectroscopy). Ultimately he 
became interested in microcomputing and 
purchased an Apple n micro two years ago. 
He is past president of Apple's British Col- 
umbia Computer Society, an Apple user 
group located in Vancouver, B.C. He is cur- 
rently the treasurer of this group. 
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ABraEZHeiKAMNHOTI 




What is VersaWriter? 

■■ VersaWriter is an inexpensive drawing 
^H tablet for tine APPLE II that lets you 
^^™ trace a picture and have it appear on 
TV display. 

■ VersaWriter is a comprehensive 
software drawing package which lets 
you color in drawings with over 100 
different colors. 

■■I VersaWriter is a shape connpiler that 
^^H converts anything on the screen 
BBBi automatically into a standard shape 
table. 



VersaWriter is a text writer for labeling 
pictures with text in six colors and 
five sizes. Use English or Greek, 
upper or lower case letters. 

VersaWriter is much morel Draw with 
brush, create schematic drawings, 
compute area and distance, edit pic- 
tures, save, recall and more. 

VersaWriter requires ROM APPLESOFT 

and 48K memory. 

$249 Suggested Retail 

UNIQUE OFFER 

Send us YOUR disk and $1 . We will promptly 
return the disk with a slide package of 10 
color pictures drawn with VersaWriter. 




^-Wr I8_ 1?^ 24^ 29[> ijn 



D Enclosed is $1 and my disk. 

Send me the slide package. 
D Send more information including 

VersaWriter dealers in my area. 

DEALER INQUIRIES INVITED. 



ADDRESS 



STATE 



♦ r 



*i 



Send To: Versa Computing, Inc. • 887 Conestoga Circle • Newbury Park, CA 91320 • (80S) 498-1956 



60 



MICRO - The 6502 Journal 



No, 32 -January 1981 




Oyb Circuit 



Mike Rowe 
Club Circuit 
P.O. Box 6502 
Chelmsford, MA 01824 

The following club annoimcements cue 
piesented in zip code oidei. 

APPLESHARE 

The purpose of this club is to allow 
persons interested in and using Apple 
Computers to exchange views, 
problems and experiences. Approx- 
imate number of members is 55. 
Meetings held the last Tuesday of each 
month [7:30 p.m.), except December, 
at Computerworks. For more informa- 
tion, contact: 

Mr. Jack Adinolfi, President 

c/o Computerworks 

1439 Post Road East 

Westport, Connecticut 06880 

Philadelphia Area Computer Society 

Subgroups for Apple and PET. Meets 
the third Saturday of each month at 
LaSalle College Science Building, 20th 
at Olney Avenue, Philadelphia, PA. 
HOTLINE telephone number for 
meeting news is (215)925-5264. 
Approximate number of members is 
300. For more information, contact: 

Eric Hafler, President 

P.O. Box 1954 

Philadelphia, Pennsylvania 

19105 

The MicroComputei Investors Assoc. 

This group publishes "The Microcom- 
puter Investor". Its purpose is utilizing 
microcomputers to assist in making 
and managing investments. General 
membership meeting will be held at 
PC81-Philadelphia, PA. For more infor- 
mation, contact: 

Jack Williams 

902 Anderson Drive 

Fredericksbmg, Virginia 22401 



MICRO offers a free one year subscrip- 
tion to cdl clubs registered with us. For 
registration form write to: 

MICRO Club Circuit 

Box 6502 

Chehnsford, MA 01824 



A.C.E.S. 

The Apple Computer Enjoyment Society 
publishes a bi-monthly newsletter of 
approximately 30-40 pages. Their 
purpose is to inform and coordinate the 
knowledge of their members about the 
Apple in the least painful way. 
Meetings are held at 7:30 p.m. at the 
N.E. High School, Ft. Lauderdale, FL, 
on the 1st Wednesday of the month for 
even months and the 1st Thvirsday of 
the month for odd months. Member- 
ship is currently at 130 -^ . For more 
information contact: 

Don Lehmbeck, President 

P.O. Box 9222 

Coral Springs, Florida 33065 

(305)524-ACES 

Attention Educators 

Affiliated with the Cleveland Digital 
Group, this club's primary objective 
will be the investigation, discovery, 
and exchange of functional and 
innovative Computer-Aided Instruc- 
tion ideas among interested computer, 
minicomputer, or microcomputer 
users and/or owners. Monthly 
meetings will be held every third 
Simday at the Cleveland Heights- 
University Heights main library, 2345 
Lee Road, Cleveland Heights, Ohio. If 
you're interested, send a self- addressed 
stamped business envelope to: 

Joyce Townsend 

P.O. Box 18431 

Cleveland Heights, Ohio 44118 

or call (216)932-6799 

Michigan APPLE 

The purpose of this club is to help 
members have fvm with their APPLES 
by sharing knowledge and information. 
Publishes a newsletter called "The 
Michigan APPLE-gram", which is 
printed 10 times per year. Meetings are 
held at 7:30 p.m. on the last Tuesday of 
each month at Southfield-Lathrup High 
School (12 miles east of Evergreen). 
Membership is currently at 300. For 
more information, contact: 

Jon Lawrence, President 

c/o The Michigan Apple 

P.O. Box 551 

Madison Heights, Michigan 

48071 

Dental Computet Newsletter 

For Medical & Dental Professionals 
using Micro & Mini computers for 
treatment and office purposes. 
Membership is 1,500-1-. Meetings are 
held at address noted below. For more 
information, contact: 

E.J. Neiburger, DDS, President 
1000 North Avenue 
Waukegan, Illinois 60085 



OSIG Chicagoland 

Meets the second Monday of each 
month at 7:30 p.m. to exchange ideas, 
discoveries, gripes and puzzles. Don 
Peterson is the President. For more 
information, contact: 
Paul Rainey 
c/o York High School 
Math Department 
355 W. St. Charles Road 
Elmhurst, Illinois 60126 
(312)530-1240, ext. 256 

River City Apple Corps 

Meets the 2nd Thursday of each month 
at 6:30 p.m. at the Old Quarry Library. 
Approximate number of members is 
100. They have a monthly publication 
called "APPLE-DILLO". For more in- 
formation, contact: 

Lenard Fein 

2015 Ford Street 

Austin, Texas 78704 

APPLEquerque Computer Club 

Our purpose is to foster knowledge and 
use of the Apple computer,- to educate 
our members on successful program- 
ming skills and to provide a forum to 
exchange programs, ideas and techni- 
ques. Membership is currently at 38. 
Meets on the first Tuesday and third 
Wednesday at a local computer store. 
For more information, contact: 

James (Chuck) Segrest, Pres. 

6609 Orphelia Ave. N.E. 

Albuquerque, New Mexico 

87109 

Okinawa Computer Club 

Holds their meetings on the second and 
fourth Simday of each month at 6:30 
p.m. at the Halstead Pavilion (USAF 
Clinic), Kadena AFB, Okinawa, Japan. 
For more information contact: 
Ralph Tullo 
PSC #2 Box 12558 
APO SF, California 96367 

Alice Apple Users Group 

This group meets every fourth Tuesday 
to exchange S/W and to propose usage 
of the Apple. Membership is currently 
at 20. For more information, contact: 

Al DeSalvio, President 

22 Hablett Crescent 

Alice Springs, N.T. 

Australia 5750 

6502-Club Copenhagen 

Address change for this club: 
John Svensson 
c/o Torvelaengeme, 10 
DK— 2620 Albertslund 
Denmark 



No. 32- January 1981 



MICRO - The 6502 Journal 



61 




The Newest In 



Apple Fun 



We've taken five of our most popular programs and 
combined them into one tremendous package full of 
fun and excitement. This disk-based package now of- 
fers you these great games: 

Mimic — How good is your memory? Here's a chance 
to find out! Your Apple will display a sequence of 
figures on a 3 X 3 grid. You must respond with the ex- 
act same sequence, within the time limit. 

There are five different, increasingly difficult ver- 
sions of the game, including one that will keep going 
indefinitely. Mimic is exciting, fast paced and 
challenging — fun for all! 

Air Flight Simulation— Your mission: Take off and 
land your aircraft without crashing. You're flying 
blind — on instruments only. 

A full tank of fuel gives you a maximum range of 
about 50 miles. The computer will constantly display 
updates of your air speed, compass heading and 
altitude. Your most important instrument is the Angle 
of Ascent/Bank Indicator. It tells if the plane is climb- 
ing or descending, whether banking into a right Or left 
turn. 

After you've acquired a few hours of (lying time, 
you can try flying a course against a map or doing 
acrobatic maneuvers. Get a little more flight time 
under your belt, the sky's the limit. 
Colonnaster — Test your powers of deduction as you 
try to guess the secret color code in this Mastermind- 
type game. There are two levels of difficulty , and three 
options of play to vary your games. Not only can you 
guess the computer's color code, but it will guess 
yours! It can also serve as referee in a game between 
two human opponents. Can you make and break the 
color code . . . ? 

Star Sliip Altacli — Your mission is to protect our or- 
biting food station satellites from destruction by an 
enemy star ship. You must capture, destroy or drive 
off the attacking ship. If you fail, our planet is 
doomed. .. 

Trilogy — This contest has its origins in the simple 
game of tic-tac-toe. The object of the game is to place 
three of your colors, in a row, into the delta-like, mul- 
ti-level display. The rows may be horizontal, vertical, 
diagonal and wrapped around, through the "third di- 
mension". Your Apple will be trying to do the same. 
You can even have your Apple play against itself! 

Minimum system requirements are an Apple II or 
Apple II Plus computer with 32K of memory and one 
minidisk drive. Mimic requires Applesoft in ROM, all 
others run in RAM or ROM Applesoft. 
Order No. 0161AD $19.95 



Solar Energy For The Home 

With the price of fossil fuels rising astronomically, solar space-heating systems are starting to become very 
attractive. But is solar heat cost-effective for you? This program can answer that question. 

Just input this data for your home: location, size, interior details and amount of window space. It will then 
calculate your current heat loss and the amount of gain from any south facing windows. Then, enter the data 
for the contemplated solar heating installation. The program will compute the NET heating gain, the cost of 
conventional fuels vs. solai- heat, and the calculated payback period— showing if the investment vriU save you 
money. 

Solar Energy for the Home: It's a natural for architeas, designers, contractors, homeowners. . .anyone 
who wants to tap the limitless energy of our sun. 

Minimum system requirements are an Apple II or Apple II Plus with one disk drive and 28K of RAM. 
Includes AppleDOS 3.2. 
Order No. 0235AD (disk-lNued vcnion) $34.95 



Math Fun 



Paddle Fun 



This new Apple disk package requires a steady eye and a quick band at the game paddles! It includes: 
InvMlen— You must destroy an invading fleet of 55 flying saucers while dodging the carpet of bombs they 
drop. Yourbombshelterswillhelpyou—forawbile. Our version ofawell known arcade game! Requires Ap- 
plesoft in ROM. 

Howitzer— This is a one or two person game in which you must fire upon another howitzer position. This pro- 
gram is written in HIGH-RESOLUTION graphics using different terrain and wind conditions each round to 
make this a demanding game. The difficulty level can be altered to suit the ability of the players. Requires Ap- 
plesoft in ROM. 

Space Wan— This program has three parts: (I) Two flying saucers meet in laser combat -for two players, (2) 
two saucers compete to see which can shoot out the most stars— for two players, and (3) one saucer shoots the 
stars in order to get a higher rank — for one player only. Requires Applesoft. 

Golf — Whether you win or lose, you're bound to have fun on our 18 hole Apple golf course. Choose your 
club and your direction and hope to avoid the sandtraps. Losing too many strokes in the water hazards? You 
can always increase your handicap. Get off the tee and onto the green with Apple Golf. Requires Applesoft. 

The minimum system requirement for this package is an Apple II or Apple II Plus computer with 32K of 
memory and one minidisk drive. 
Order No. 0163AD $19.95 



The Math Fim package uses the techniques of immediate feedback and positive reinforcement so that 
students can improve their math skills while playing these games: 

Hanging — A little man is walking up the steps to the hangman's noose. But YOU can save him by answering 
the decimal math problemis posed by the computer. Correct answers will move the man down the steps and 
cheat the hangman. 

Spellbinder— You are a magician battling a computerized wizard . In order to cast death clouds, fireballs and 
other magic spells on him, you must correctly answer problems involving fractions. 
Whole Space — Pilot your iipace craft to attack the enemy planet. Each time you give a correct answer to the 
whole number problems, you can move your ship or fire. But for every wrong answer, the enemy gets a 
chance to fire at you. 

Car Jump— Make your stunt car jump the ramps. Each correct answer will increase the number of buses your 
car must jump over. These problems involve calculating the areas of different geometric figures. 
Robot Duel- Fire your laser at the computer's robot. If you give the correct answer to problems on calculat- 
ing volumes, your robot ceui shoot at his opponent. If you give the wrong answer, your shield power will be 
depleted and the computeir's robot can shoot at yours. 

Sub Altadt- Practice using percentages as you maneuver your sub into the harbor. A correct answer lets you 
move your sub and fire at the enemy fleet, 

All of these programs run in Applesoft BASIC, except Whole Space, which requires Integer BASIC. 
Order No. 0160AD $19.9ii 



— Skybombers — 

Two nations, seperated by The Big Green Moun- 
tain, are in mortal combat! Because of the terrain, 
their's is an aerial war— a war of SKYBOMBERS! 

In this two-player game, you and your opponent 
command opposing fleets of fighter-bombers armed 
with bombs and missiles. Your orders? Fly over the 
moimtain and bomb the enemy blockhouse into dust! 

Flying a bombing mission over that iiuiocent look- 
ing mountain is no milk run. The opposition's aircraft 
can fire missiles at you or you may even be destroyed 
by the bombs as they drop. Desperate pilots may even 
ram your plane or plunge into your blockhouse, sui- 
cidally. 

Flight personnel are sometimes forced to parachute 
from badly damaged aircraft. As they float helplessly 
to earth, they become targets for enemy missiles. 

The greater the damage you dealto your enemy, the 
higher your score, which is constantly updated at the 
bottom of the display screen. 

The sounds of battle, from exploding bombs to the 
pathetic saeams from wounded parachutists, remind 
each micro-commander of his bounden duty. Press 
On, SKYBOMBERS— Press On! 

Minimum system requirements: An Apple II or Ap- 
ple II Plus, with 32K RAM, one disk drive and game 
paddles. 
Onler No. OrriAD (disk-based version) $19.95 




Instant Software 




•a trademark of Apple Computer Inc. 

PETERBOROUGH, N.H. 03458 
603-924-7296 
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Apple* Software 



From Instant Software 



Santa Paravia and Fiumaccio 



Buon giomo, signore! 

Welcome to the province of Santa Paravia. 
As your steward, I hope you will enjoy your 
reign here. I feel sure that you will find it, shall 
we say, profitable. 



Perhaps I should acquaint you with our little domain. It is not a 
wealthy area, signore, but riches and glory are possible for one who 
is aware of political realities. These realities include your serfs. They 
constantly request more food from your gram reserves, grain that 
could be sold instead for gold florins. And should your justice 
become a trifle harsh, they will flee to other lands. 

Yet another concern is the weather. If it is good, so is the harvest. 
But the rats may eat much of our siuplus and we have had years of 
drought when famine threatened our population. 

Certainly, the administration of a growing city-state will require 
tax revenues. And where better to gather such funds than the local 
marketplaces and mills? You may find it necessary to increase custom duties or tax 
the incomes of the merchants and nobles. Whatever you do, there will be far- 
reaching consequences. . .and, perhaps, an elevation of your noble title. 

Your standing will surely be enhanced by build'mg a new palace or a magnificent 
caltedrale. You will do well to increase your landholdings, if you also equip a few 
units of soldiers. There is, alas, no small need for soldiery here, for the unscrupulous 
Baron Peppone may invade you at any time. 

To measure your progress, the official cartographer will draw you a mappa. From 




it, you can see how much land you hold, how much of it is under the plow and how 
adequate your defenses are. We are unique in that here, the map IS the territory. 
I trust that I have been of help, signore. I look forward to the day when I may ad- 
dress you as His Royal Highness, King of Santa Paravia. Buona Jortuna or, as you 
say, "Good luck". For the Apple 48K. 
Order No. 0174A $9.95 (cassette version). 
Order No. 0229AD $19.95 (disk venion). 



TO SEE YOUR LOCAL INSTANT SOFTWARE DEALER OR USE THE ORDER FORM BELOW 

ORDER ^^ 

For Fast tk ffify^ 

Service^ Toll-Frec 
1-800-258-5473 



Apple Cassettes 

00I8A Golf S7.95 

0025A Mimic $7.95 

(XMOA Bowling/Trilogy $7.95 

0073A Math Tutor I $7.95 

0(J79A Oil Tycoon $9.95 

(X)80A Sahara Warriors $7.95 

0088A Accounting Assistant $7.95 

0094A Mortgage w/Prepayment Option/ 

Financier $7.95 

tX»6A Space Wars $7.93 

0098A Math Tutor II $7.95 

0174A Santa Paravia and Fiumaccio $9.95 

0I48A Air Flight Simulation $9.95 

We Guarantee It! 



^^ 



\jys> Guarantee ^^<;^_^ 

OUR PROGRAMS ARE GUARANTF.F.D 
TO BE QUALITY PRODUCTS. IF NOT 
COMPLETKLY SATISFIED YOU MAY 
RETURN THE PROGRAM WITHIN 60 
DAYS. A t REDIT OR REPLACEMENT 
WILL BE WILLINGLY GIVEN FOR 
ANY REASON. 



r 

1 


■ «■■ «^B ^M «■■ «■■» ^^ ^n mmm mmm mmm «■■ «■■ ^b «■ mm ^m i^ «m mm «■■ * 
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^^^^^^^^1 Order your Software today! ^^^^^^^| 






Quantity 


Order No. 


Program name 


Unit cost 


Total cost 
















































































Shipping and handling 




S1.00 




L. 








insianT oonware Inc 
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Peterborough, N.H. 03458 
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PERFECT AIM 




♦ r 



ATTRACTIVE FUNCTIONAL PACKAGING 
FOR YOUR AIM-65 MICROCOMPUTER 

• Professional Appearance 

• Striking Grey and Black 
Color Combination 

• Protects Vital Components 



♦ t^ 



ENGINEERED SPECIFICALLY FOR 
THE ROCKWELL AIM-65 

• All Switches Accessible 

• Integral Reset Button 
Actuator 

• Easy Paper Tape Replacement 

EASILY ASSEMBLED 

• Absolutely No Alteration 
of AIM-65 Required 

• All Fasteners Provided 

• Goes Together in Minutes 



MADE OF HIGH IMPACT STRENGTH 
THERMOFORMED PLASTIC 

• Kydex 100* 

• Durable 

• Molded-ln Color 

• Non-Conductive 

AVAILABLE FROM STOCK 

• Al tow Three to Four Weeks 
for Processing and Delivery 

• No COD'S Please 

• Dealer Inquiries Invited 



TO ORDER: I.Fill In this Coupon (Print or Type Please) 

2. Attach Check or Money Order and Mail to: 

NAME ___________^ ._ 



STREET. 



CITY 



STATE 
SAE1-1 



PLEASE SHIP PREPAID 

@ $43.50 each 
California Residents Please Pay 

$46.33 (Includes Sales Tax) 
SAE1-2 PLEASE SHIP PREPAID 

(S $46.50 each 
California Residents Please Pay 

$49.52 (Includes Sales Tax) 
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Interfacing the 
6522 Versatile Interface 

Adapter 



The 6522 handles I/O for AIM, 
SYM, KIM, PET and Ohio 
Scientific microcomputer 
systems. This chip contains 
latches, counters, timers, shift 
registers, and handshaldng 
lines, and provides a great deal 
of support for many interfacing 
applications. IHere is how to 
include these capabilities in 
your system. 



Marvin L. De Jong 
Math/Physics Department 
The School of the Ozarks 
Pt. Lookout, Missouri 65726 



One of the most popular interfacing in- 
tegrated circuits in the 6500 family is 
the 6522 Versatile Interface Adapter. It 
is also a complex chip, and becoming 
familiar with it can be frustrating. In an 
earlier article published in MICRO, Oc- 
tober 1979, "6522 Timing and Count- 
ing Techniques" (17:27) we described 
how to use the Tl timer and the T2 
counter/ timer. In this article we give 
more of an overview of the entire chip, 
we supply some detailed interfacing 
circuits for adding 6522s to your 
microcomputer system, and we provide 
some useful charts that diagram the 
functions of the bits in various 
registers. I have found these latter 
charts to be very useful when writing 
assembly language programs that use 
the 6522 as an I/O device. With regard 
to the interfacing circuits included in 
this article, note that several 6502 
systems manufacturers are offering pro- 
totyping boards that mate with the 
motherboards or card file systems they 
sell. The interfacing circuits given 
herein are appropriate for wiring your 
own I/O board that might include 
several 6522s as well as other in- 
tegrated circuits such as A/D con- 
verters, V/F converters, and D/A 
converters. 



Several single-board microcom- 
puters use a 6522 as the I/O device. For 
example, the AIM 65, SYM-1, and the 
SUPERKIM make extensive use of the 
6522 either as an on-board I/O device, 
or for the user's applications. 

Interfacing the 6522 

The 6522 is a 40-pin integrated cir- 
cuit that provides the user with two 
eight-bit I/O ports (each with two 
handshaking pins], a. serial data port, 
and two 16-bit timer/ counters. A pin 
configuration diagram is given in figure 
1, and a block diagram is shown in 
figure 2. The 6522 has 16 internal 
registers that are selected by the logic 
levels on the four register select lines 
RS3 - RSO. Table 1 summarizes the 
names of the various registers that are 
selected by RS3 - RSO and the 
R/W line. The I/O ports are 
sometimes ref ened to as PAD and PBD, 
rather than the designations given in 
table 1. All of the ftmctions of the 6522 
are initiated and controlled by reading 
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Figure 1. Pin configuration of the 
6522. Courtesy of Rockwell 
International Corporation. 



or writing to the registers listed in table 
1. Thus, our first task is to connect the 
6522 to a 6500 family microprocessor, 
the 6502 for example, so that we can 
read and write to the registers. 

Refer to the block diagram of the 
6522 shown in figure 2. The pins that 
concern us in the present context are 
the so-c alled "chip access control" 
pins, the IRQ pin, and the pins D7 - DO 
that connect to the microcomputer 
system's data bus. We begin with the 
chip access control pins and the IRQ 
pin. Several of these connections are 
straightforward: FES will be co nne cted 
to the system reset line and the RES pin 
on the microprocessor, R/W is con- 
nected to the R/W line on the 

microprocessor, 52 goes to the 

microprocessor's 52, a nd the IRQ pin is 
connected to the IRQ pin on the 6502. 
(A pull-up resistor, nominally 4.7K 
ohms, is required for this latter 
connection.) 

The remaining chip access control 
pins are used to address the 16 internal 
registers of the 6522. If pins RS3 - RSO 
are connected to address lines A3 - AG, 
respectively, then the 16 registers will 
occupy 16 contiguous memory loca- 
tions in the address space of the com- 
puter system. The registers will have 
the same order given in table 1. The 
location of the block of 16 memory 
locations in the address space of the 
computer system will be determined by 
how the high-order address lines are 
decoded to form the device-select 
pulses that are ap plied to the chip- 
select pins CSl and CS 2 . 

The design philosophy of most 6502 
systems calls for R/W memory to be 
located at the low end of the address 
space and the microcomputer system 
ROM is located at the high end of the 
address space. Thus, I/O functions are 
usually located somewhere in the 
"middle" of the address space. An ad- 
dress decoding scheme to do this is 
described in figures 3 and 4. 
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Flf/ure 2. Block diagram of the 6522. Courtesy of Rockwell International Corporation. 
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Assume that a page of memory 
space is to be dedicated to I/O func- 
tions, giving 256 locations. The 74LS04 
and the 74LS30 in figure 3 are used to 
select any page of memoiy that ends in 
a three, seven, 11, or 15 such as pages 
$03, $67, $93, $AB, or $FF. The 
jumpers or switches connected to the 
74LS30 select the page of memory that 
is to be used for I/O. This decoding 
scheme should allow the user sufficient 
flexibility to avoid both the R/W 
memory locations and the ROM 
locations. 



The page select pulse, DS$93XX in 
figure 3, is connected to a 74LS154 one- 
of-sixteen decoder that decodes address 
lines A7 - A4. This decoder determines 
the high-order nibble of the low-order 
byte of the address in the page selected 
by the circuit of figure 3. 



Reginw 
Numbtr 


RS Coding 


Ra^ister 
Dcsig. 


Description I 


RS3 


RS2 


RSI 


RSO 


Write 


Read 

















ORB/IRB 


Output Register "8" 


Input Register "B" 


1 











1 


ORA/IRA 


Output Register "A" 


Input Register "A" 


2 








1 





DDRB 


Data Direction Register "8" 


3 








1 


1 


DORA 


Data Direction Register "A" 


4 





1 








T1C-L 


Tl Low-Order Latches Tl Low-Order Counter 


5 





1 





1 


TIC-H 


T1 High-Order Counter 


6 





1 


1 





TILL 


Tl Low-Order Latches 


7 





1 


1 


1 


T1L-H 


Tl High-Order Latches 




8 













T2C-L 


T2 Low-Order Latches 


T2 Low-Order Counter 


9 










1 


T2C-H 


T2 High-Order Counter 


10 







1 





SR 


Shift Register 


11 







1 


1 


ACR 


Auxiliary Control Register 


12 




1 








PCR 


Peripheral Control Register 


13 




1 





1 


IFR 


Interrupt Flag Register 


14 




1 


1 





lER 


Interrupt Enable Register 


15 


1 


1 


1 


> 


ORA/IRA 


Same as Reg 1 Except No "Handshake" 



♦ 



Table 1. Addressing the 16 registers of the 6522. Courtesy of Synertek, Inc. 
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The 74LS154 circuit is given in 
figure 4. It devides a page of memory 
into blocks of 16 memory locations. 
Althou gh only on e of the device select 
pulses, DS$930X, is shown connected 
to an I/O device, the other device 
select pulses may be used to select 
other devices as they are added to your 
I/O board. 

The 6522 decodes the address lines 
A3 - AO and add resses its internal 
registers when CS 2 is at logic zero and 
CSl is at logic one. Thus, in figure 4 
the device select puls e fro m the 
74LS154 is connected to CSl , while 
CSl is held at logic one. The 16 
registers on the 6522 have addresses 
$9300 to $930F starting with the PBD 
register at $9300 and ending with the 
PAD "No Handshake" register at loca- 
tion $930F. Another 6522 could be add- 
ed using any of the other 15 device 
selects from the 74LS154. 

As mentioned before, the 74LS154 
in figure 4 divides a page of memory in- 
to blocks of 16 locations. Other 
74LS154s can be added to divide each of 
these blocks into separate memory 
locations; that is, device select pulses 
can be produced for each memory loca- 
tion in a block of 16. The circuit of 
figure 5 indicates how this is ac- 
complished. Although each 6522 added 
to the system requires 16 locations, 
there should be enough locations left, 
in the page that we choose for I/O func- 
tions, to handle our requirements. 

Suppose we wish to mount all the 
I/O circuits on a single I/O board (or 
card) to be mounted on some kind of 
motherboard. The circuits in figures 3 
to 5 could easily be wired on such a 
card with several 6522 VIAs and other 
I/O devices. In such a case, buffering of 
the data bus is usually implemented on 
the board, and frequently the address 
bus and the control bus are also buf- 
fered. The page select pulse from the 
SN74LS30 in figure 3 can be used to ac- 
tivate the data bus buffers when an I/O 
device on the card is selected. The cir- 
cuit in figure 6 indicates one possible 
way to buffer the data bus using two 
SN74LS243 quadruple bus transceivers 
for buffers. 

In figure 6 only one of the 
SN74LS243 buffers is shown in detail. 
Note that the buffers, three-state 
devices, are activated from left to right 
with a WRITE operation; that is, when 
the page^select pulse is at logic zero and 
the R/W line is at logic zero. The buf- 
fers are activated from right to left with 
a READ operation; that is, when the 



SN7^::£04 



Ei5>-^ 



^u> 







\^> 



sN7a^30 




PAGE SELECT FULSE 



4> 



DS$93XX 



Figure 3. Programmable page select circuit, preset for page $93 of tfie address 
space. 
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-2L. 



DSS93KX 

FAQE SELECT 
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_aa 



19/ 



Cg2 
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Q+5V 
21i^ 



SN74LS154 



^01 



J 



1 DSt93Cg 



E>- 



+57, 



Ji 



20 



23- 






_23^ 






n 



2k 



RSO 
RSI 
!!S2 
B33 

CS2 



CSl 



6522 



D1.7! 



figure A. Using a SM74LS154 to select a 6522. The 6522 occupies 16 memory 
locations with addresses $9300 to $930F. The page select signal is generated 
by the circuit In Figure 3. 
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BSijsff 



FIgun 5. Using a MLS154 to provide 
device select pulses for memory 
locations $9 3F0 ■ $93F F. The device 
select pulse 0S$93FX Is from the 
74LS154 In Figure 4. 



page select pulse is at logic zero and the 
R/W line is at logic one. 

The 6522 VIA's data pins are con- 
nected to the DB7 - DBO pins on the 
right-hand side of the SN74LS243s. 
Any other I/O devices will also be us- 
ing these data lines. If the only I/O 
device on the I/O board is a single 
6522, then data bus buffering might not 
be required. 

Figure 7 illustrates how the address 
bus and the control bus may be buf- 
fered. The three-state devices shown 
are kept in their active states at all 
times. The 81LS97 is convenient to use 
because it buffers ei,ght lines with one 
chip, so only two chips are required to 
buffer the entire address bus. Many 
other chips will do the same job, and 
you should feel free t;o substitute these. 



[dbo^- 



Ldbi^ 



SISTIM DATA BITS 





-[^p> 



-{rar> 



TO THE 6;22 ANC OTHB! 
I/O DEVICES 



-[ro2> 



P+5V 



2 g> ^' 

K> — 



[^> — 



SN71tLS0O 



SH7W:S243 




^ 



13 



Figure 6. Buffering the data bus for the I/O devices. OS Is the page select 
signal from the 74LS30 In Figure 3. R/W is the system READ/WRITE line. 
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E>^ 



81LS97 
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E>-^ 



E>-^ 
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13 



L5 



L7 



20 
O +5V 



0+5V 



14 
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^-ifl. 



SH74Ifll25 



4II> 

-{a9> 
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-E> 
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FIgun 7. Buffering the address bus 
and the control bus. 
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Exampla 1. A program to maka Port A an Input port and Port B an output port. 


$0300 A9FF 


START LDA $FF Store all ones in the data direction 


$0302 8D 02 93 


STA PBDD register of Port B. 


$0305 A9 00 


LDA $00 Store all zeros in the data direction 


$0307 8D 03 93 


STA PADD register of Port A. 


Tabia 2. Mamory looatlona of tha 16 6522 raglstars. 


ADDRESS 


REGISTER 


$9300 


Port B - PBD 


$9301 


Port A - PAD 


$9302 


Port B Data Direction — PBDD 


$9303 


Port A DaM Direction — PADD 


$9304 


Timer 1 Latch Low and Timer 1 Counter Low — 




TILLTICL 


$9305 


Timer 1 Latch High and Timer 1 Counter High — 




TILH &. TICH 


$9306 


Timer 1 Latch Low — TILL 


$9307 


Timer 1 Latch High — TILH 


$9308 


Timer 2 Latch Low and Timer 2 Coiuiter Low — 




T2LL & T2CL 


$9309 


Timer 2 Counter High — T2CH 


$930A 


Shift Register — SR 


$930B 


Auxiliary Control Register — ACR 


$930C 


Peripheral Control Register — PCR 


$930D 


Interrupt Flag Register — IFR 


$930E 


Interrupt Enable Register — lER 


$930F 


Port A — PAD (Without handshaking} 



Simple Input/Output Functions 
with the 6522 

Now that we have interfaced the 
6522 to a 6502 (or other 6500 family 
microprocessor), we are ready to inter- 
face it to some devices in the world out- 
side of the microprocessor system. 

There is a one-to-one cor- 
respondence between the pin functions 
(input or output) of a port and the bit 
values in the port's corresponding data 
direction register. A one in the data 
direction register bit configures the cor- 
responding I/O pin to be an output pin, 
while a zero in the data direction 
register bit configures the correspond- 
ing I/O pin to be an input pin. Thus, if 
$F8 is loaded into PBDD, address 
$9302, using the decoding illustrated in 
the figures, then pins 7, 6, 5, 4, and 3 of 
Port B (PBD) will be output pins, while 
pins 2, 1, and will be input pins. 
Example 1 illustrates how all eight pins 
of Port B are configured as output pins, 
while all eight pins of Port A are con- 
figured as input pins. 



FEBIPHEBAL COHISOL RHIISTHS 



PCR7 



PCR6 



CB2 PIN CON-ntOL 

SET iras ON NHJAnVE TRANSITION, 

CLfiUl IFB3 WITH REM) (B. NRITB OF PBD. 
1 SET IFS3 ON mULfUE TRANSITION, 

CLEAH IFR3 BI WRITIHJ CSffi INTO IKRS. 

SET IFR3 ON POSITIVE TRANSITION, 
CLEAR IFR3 WITH READ OR WIITE OF FBD. 

1 SET IFR3 CM POSITIVE IBANSITIOIJ, 
CLEAH ira3 EOT WRITDIS 0«E INTO IFR3. 

OUTPUT MODE. CB2 TO UBIC ZERO WITH 
A READ OR WRITE OF FBD, RESET BT A 
CBl TRANSITION. 

1 OUTPUT MODE. (»IE GXCLE I£GIC ZERO 
PULSE FOLUWINC READ OR NRITE OF PEH. 

OUTPUT MODE. CB2 IS AT LOOIC ZSiO. 

1 OUTPUT MODE. CB2 IS AT LOGIC ONE. 



01 



1 



1 



1 



PCR5 PCR4 PCR3 P0R2 PCBl 



PCR^ 



E 



GAl PIN INTERRUPT CONTROL 

^ - IFRl SET ON NHJATIVE HJGE 

1 - IFRl SET ON POSITIVE EDGE 



CA2 PIN CONTROL 

SET IFR^ ON NHJATIVE TRANSITION, 

CLEAR IFI)ZSWITH READ OR WRITE OF PAD. 
1 SET IFR^ ON NHJATIVE TRANSITION, 

CLEAR IFR^ m WHITING ONE INTO IFR0. 
1 SET IFRji ON POSITIVE TRANSITION, 

CLEAR IFR^ WITH READ OR VEITE OF PAD. 
1 1 SET IFR0 ON POSITIVE TRANSITION, 

CIMR IFR^ BI WRITIIC ONE INTO IFR0. 
10 OUTPUT MODE. GA2 TO LOGIC ZERO WITH 

A READ OR WRITE OF PAD, RESET BY A 

CAl TRANSITION. 
10 1 OUTPUT MODE. ONE CYCLE LOGIC ZERO 

PULSE FOLLOWIIK READ Cffi WRITE OF PAD. 

110 OUTPUT MODE. CA2 IS AT LOGIC ZERO. 

111 OUTPUT MODE. CA2 IS AT LOGIC ONE. 



— CBl PIN INTERRUPT CONTROL 
jiS ■■ IFR4 SET ON NHJATIVE HXJE 
1 ■■ IFR4 SET ON POSITIVE EDGE 

FIguro B. Dfltarmlnlng tha function of tha control pins CAl, CA2, CBl, and CB2 by the number stored In the peripheral 
control register (PCR). 
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AUIIIJAKf OONTKOL HB3ISTE 



ACB7 



ACR6 



acr; 



ACIUt ACa3 



Acm 



ACRl 



ACR^ 



PAD UTCH COmHOL 

b - DISJLBLE LATCHBC 
X > QiABLE UTCKDC 
PEC UTCH OCWIBOL 



- SHIFr HH51STH1 CffllTROL BITS 
(HOT DISCUSSH) ) 



I T2 COONTlH/nMHi COHTBOL 

- SSCLE TIME INTERTAL MODE 

1 - POISE conumc mode 



— Tl TIMSl CONTHOL 

SISGIZ TIME IHTS17AL MODE - FB? DISABLED 

1 FREE-RUHNINQ MODE - FB7 DISABLES 

1 SnCLE TIME INTEHVAL MODE - NEATIVE PULSE OH PB7 
1 1 FREE-RDNNim MODE - SQaAHE mVE ON PB7 

FIgum 9. Controlling various 6522 functions with the auxiliary control register 
(ACR). 



IFR7 



IFR6 




IPT mir. HmTSTm 



IFR3 



in« 



IFBl IFH(i 



t 



SET BY TRANSITTON OH CA2, 
CLEARED EX READ OR VRITE OF PAD 



I SET BY rHANSITIOB ON OAl, 

ClStSS) BY RBU) (H MRITE OF PAS 



- SEBIAL RSIISTER FLAG 

I SET BY TRAMSITIOI ON CB2, CLEARED BY REUD OH «!ITE OF PBD 

-SETT BY KANSITIQN ON CBl, CLEARED BY REU) OR VRITE OF PBD 

I SET BY TDffi-OaT OF T2, CLEARED BY BEAD T2 LOW CR WRITIi T2 HIGH 

. SET BY TIME-OTT OF Tl, CLEAHH) BY READ Tl LOW Ml WRITE Tl ffiBH 
-SET HHES ANY OTHEB IFR BIT IS SET, CLEARED WHEN ALL OTHES IFR BITS >iEE CLEAR 



Figure 10. The interrupt flag register (IFR). Any bit except IFR7 may also be 
cleared by writing a one Into that bit. 



INTERRUFT LIABLE RBJISTES 



IER7 



IER6 



lES; 



IER4 IES3 



IBU 



IBll 



I CA2 rao 1 



CA2 IRQ EXIABLE 
CAl MBUBLE 
SHIFT BHJISTEK 35 EKABU! 

CB2 S9 EDABLE 

CBl ISi ENABLE 

THOU 2 ^ ENABLE 

TIMER 1 1S5 nlABLE 

lEH COiniOL (WRITE lEH) 

- FDR nCH lES BIT SET TO LOQIC ONE, THE CORRESPONDIIC TSi BIT IS CLEARED 

1 - FOR EACH lES BIT SET TO ICGIC ONE, THE CORSESPOKDHC IfS BIT IS EEABLSI 

Figure 11. Controlling the iRTpIn on the 6522. If the llfSTpin Is enabled by a bit 
In the lER, then the 6522 HSSTpIn will go to logic zero when the con'espondlng 
flag In the interrupt flag register Is set. 



Once the I/O port has been con- 
figured, data may be written to [STA in- 
struction) an output port and read at 
(LDA instruction) an input port. 

It is important to know that when 
the microcomputer is reset (a condition 
that also occurs during power-up condi- 
tions) all of the registers except the 
timer latches are cleared. Thus, the 
Port A and Port B pins are in the input 
condition after a reset. TTL integrated 
circuits whose inputs may be con- 
nected to the Port A or Port B pins will 
behave as if their inputs are at logic 
one. For example, if one of the pins of 
Port A controls a TTL circuit that in 
tum controls a motor, it is important 
that a logic one at that pin conesponds 
to the motor being in its off condition, 
because otherwise, the motor will start 
running as soon as power is applied to 
the computer. 

It is also important to know that 
reading Port A gives the values of the 
logic levels on the Port A pins. Reading 
Port B, on the other hand, gives the 
logic levels stored in the output 
legistei, regardless of whether the pins 
are being loaded or not. Care must be 
used in using the read-modify-write in- 
structions (ASL, LSR, INC, etc.) to 
operate on Port A, whereas these in- 
structions will work for Port B. 



The Functions of the Other 6522 
Registers 

Although space does not permit an 
exhaustive explanation of all of the I/O 
options, we pause here to briefly 
describe the purpose of several of the 
control and flag registers on the 6522. 
Table 2 summarizes the addresses of all 
of the registers if the address decoding 
scheme described in figures 3 to 5 is 
used. In this section the peripheral con- 
trol register (PCR), the auxiliary con- 
trol register (ACR), the interrupt flag 
register (IFR), and the intermpt enable 
register (lER) are introduced. In the 
previous section the two I/O registers, 
PAD and PBD, were introduced, as well 
as their associated data direction 
registers, PADD and PBDD. 

The peripheral control register con- 
trols the functions of the control pins 
on the 6522, namely CAl, CA2, CBl, 
and CB2. The significance of the 
various bit values in this register is 
outlined in figure 8. The auxiliary con- 
trol register controls the modes of the 
two counter/ timers, the shift register, 
and controls the latching function of 
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KETBOARD 
(ASCII) 



B6 
B5 
B4 

B3 
B2 
Bl 
BjZi 
STB 



4 



_rL 



jdi 



PA7 
PA6 

PA 5 
PA4 
PA3 
PA2 
PAl 
PAO 
CAl 



6522 
VIA 




CONTROL BUS 



ADDRESS BUS 



DATA BUS 





Figure 12. Connecting a 6522 VIA to an ASCII encoded keyboard with a strobe pulse. 



Example Z A program to InHMIze the 6522 registers to read an ASCII keyboard with strobe. 


$0300 A9 01 
$0302 8D OB 93 
$0305 8D OC 93 


START 


LDA$01 

STAACR 

STAPCR 


Enable latching on Port A with a trans- 
ition on CAl by setting ACRO to one. 
Make CAl active on poiiitive 
transition. 
Remainder of main progiram is here. 


$1414 20 00 20 




JSR 
KEYREAD 


]\anp to subroutine to read keyboard. 
More of the main program is here. 


$2000 A9 02 
$0202 2C OD 93 
$0205 FO FB 

$0207 AD 01 93 
$020A60 


KEYREAD 
WATTKEY 


LDA$02 

BiriFR 

BEQ 

WATTKEY 

LDAPAD 

RTS 


Mask all bits of the IFR isxcept IFR 1. 

Is IFRl set? 

No. Wait until key is prtssed. 

Yes. Read keyboard and clear IFRl. 
Return from subroutine. 


Example 3. A program to read an ASCII encoded keyboard on an bitenupt basis. 


$0300 A9 01 
$0302 8D OB 93 
$0305 8D OC 93 
$0308 A9 82 
$030A 8D OE 93 
$030D 58 


START 


LDA$01 

STAACR 

STAPCR 

LDA$82 

STAIER 

CU 


Enable latching on Port A with a trans- 
ition on CAl by setting ACRO to one. 
Make CAl active on a positive trans- 
ition. Bits 7 and 1 are at logic one 
to enable intermpt from IFRl. 
Allow interrupts from IRQ. 

Remainder of main program is here. 


$2000 A9 7F INTERRUPT 
$2002 2D 01 93 
$2005 40 


LDA $7F Mask bit 7 of the input port so the 
AND PAD ASCH code is in the accumulator, 
RTl then return to the main program. 



the two ports. The significance of the 
various bit values in this register are 
outlined in figure 9. Both of these 
registers are initialized by wnriting the 
appropriate binary number to the ad- 
dresses given in table 2. 

On the other hand, the interrupt 
flag register's contents are usually 
determined by external events, rather 
than writing to the register. For exam- 
ple, a negative transition on CAl may 
set bit IFRl, causing the program to 
make a branch. Reading Port A would 
clear the same bit. (Our example of an 
ASCn encoded keyboard will make this 
clear in a few moments.) The various 
flags in the interrupt flag register are 
summarized in figure 10. 

Finally, the interrupt enable register 
is used to choose between the option of 
having an event, say the time-out of the 
Tl timer, set a flag or se t a f lag and 
cause an interrupt request (IRQ signal) . 
If, for example, IER6 is set by writing 
$C0 to the interrupt enable register 
(lER)., then t he ti me-out of timer Tl 
wUl cause the IRQ pin on the 6522 to go 
to logic zero. If, on the other hand, IER6 
is cleared by writing $80 to the inter- 
rupt enable register, then the time-out 
of t imer Tl will not produce an 
Ki^signal. (Refer to figure 11 for details 
of the operation of the lER.) 
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Now that I have introduced these 
four registers, let me illustrate their use 
with an example, namely an input port 
for an ASCII encoded keyboard. Figure 
12 shows the connections that are re- 
quired. It is assumed that the encoded 
keyboard provides a positive strobe 
when the seven bits of ASCII data are 
available. The program necessary to in- 
itialize the PCR and read the keyboard 
is given in example 2. We will set up 
the ACR to latch the data from the 
keyboard into Port A when the strobe 
occurs, and the keyboard is read by a 
subroutine that waits until the IFRl 
flag is set before reading the keyboard. 
Such a program might be part of a 
BASIC interpreter in which the inter- 
preter waits for keyboard entries and 
then stores them in memory as they are 
made. Note that the accumulator 
passes the ASCII code, plus the value of 
PA7, from the subroutine to the main 
program where it is processed. This 
program should be studied in coimec- 
tion with figures 8 to 12. 

The keyboard could also be read on 
an interrupt basis. The modifications 
for this are shown in example 3. Note 
that the interrupt (IRQ) vector must 
point to the interrupt routine in order 
for example 3 to work. Also note that in 
both example 2 and 3 the Port A data 
direction register was not initialized to 
contain $00 because, it was assumed 
that a. system power-up or reset 
accomplished this. 

In example 3 there would very like- 
ly be more instructions in the interrupt 
routine to process the keyboard data. 
For example, it might be stored in some 
kind of first-in-first-out (FIFO) 
memory. The important point of exam- 
ple 3 is the means by which the inter- 
rupt enable register (lER) is initialized. 

Other uses for the control pins will 
appear in subsequent applications. For 
example, the control pins in the output 
mode may be used to initiate a conver- 
sion when D/A or A/D converters are 
interfaced to the 6522. Alternatively, in 
the input mode the control pins may be 
used to detect when a conversion is 
complete. This summarizes our over- 
view of the 6522. 

The figures describing the bit func- 
tions of the control and flag registers 
will become a valuable reference for 
further work with the 6522. 
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Presenting the 

CJM Microsystem 

For the Apple II 



The CJM Microsystem for the Apple 11 

The CJM Microsystem now provides Apple owners 
with the hardware they need to interface Joysticks, 
sense external Inputs, and control other devices such 
as audio or video recorders. The applications are 
endless. 

Institutional Standards 

All metal chassis and heavy duty cables and con 
nectors allow the CJM Microsystem to meet the 
demands of the educational environment. 

A Variety of Applications 

The Microsystem can be uised for many applica- 
tions from games to sophisticated computer 
assisted instruction. 

The Miscrostik can be use<i for graphics 
input, menu selection, or einy screen 
oriented function. 
The output modules such as the 
Microbox can run appliances, lamps, 
motors, relays or other loads from 
keyboard or program commands. 
The input modules can sense 
temperature, light, or 
sound to provide external information. 
Specialized modules, such as the VTR Con 

troller can sense tape position and drive the VTR forward and reverse 
utilizing the input and output capabilities interactively. 




The Graphics Kit Sofftwwe 

This is a cfisk based program written in Integer Basic and 
Assembly Language. It uses this MicrostUts to simulate the 
Apple Graphics Pad and adds Siome extra features, including: 

• Draw shapes in 8 modes using Microstiks. 

• Draw to both HIRES screens. 

• Auemble sh^ies into tables. 

• Select a cokx from the paUetteiisng the A^rostik cursor. 

• Add text dbectly to drawings widi auto scrolling in either directioa 
■ Move shapes around ^HRES screens and dqx>sit them jrt the 

touch of a buttoa Press the button again to pick them up off the 
screen and move them to a new k>cation. Press a key to rebate the 
sh^)e. Press another to bring \3p the next shape. 

• There are nnore than 50 dbtino drawing commaTKis. 

• The Animate Command cuts fnvn screen 1 to screen two and back 
again. 

• The Sam Command saves diher screen for later use in custom 
programs as charts or graphs (ideal for CAl appUcations). 



USE YOim MASTERCHARGE OR VtSA CARDS 



APPLEXPANDER+S 


$ 54.95 


MICROSTIK 


$ 59.95 


ACCONTflOLBOX 


$ 89.95 


RELAY CONTROL BOX 


$ 89.95 


LIGHT PEN 


$ 39.95 


GRAPHICS KIT SOFTWARE S 49.9B ' 


PDL ADAPTER KIT 


t 14.96 



*» 



Microsystem 




CJM INDUSTRIES, INC. 

P.O. Box 2367 

nuton. Virginia 

22090 



ORDER TODAY 703-620-2444 



The Applexpander 

The APPLEXPAMDER is the heart of the CJM MICRO- 
SYSTEM. The Appiexpander plugs into the Apple Qame 1/0 
sockeL Once the expander is installed there will never be 
another need to access the game sockeL The expander buf- 
fers the input and output signals to the Qame \/0. Providing 
the added safety needed to interface to the outside world 
The two input sockets accept a Microstik, Light Pen or an 
assortment of input devices such as temperature, audio or 
light sensors. 

The output socket will drive the AC Control Box, Relay 
Modules, 1 Pn Arrays and other controllers. 
The APPUEXPAMDER-^S Includes an Auxilliaiy Speaker/ 
Headphone Jack, and Volume Control. The Apple speaker is 
automatically muted when a speaker is plugged into the re- 
mote jack. The volume control adjusts the sound leveL When 
an external speaker (not induded) is used, the sound quality of 
tlie Apple increases dtamatKally. 

Mkixwtik 

The CJM MICROSTIK is a dual axis joystick. It features an all 
metal rugged chassis, with a heavy du^ cable and Jones plug. 
Each Wciostik includes two pushbuttons for interactive con- 
trol. Additional circuitry reduces the current draw so that two 
Microsdks can safely be used simultaneously through the 
game socteL These are high quality units constructed to 
withstand abuse. Extensk>n cables are available as accesso- 
ries. 
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SIRIUS SOFTWARE PRESENTS 

i4ction Software 
For The Apple 

Both Barrels 

This package features two games: HIGH NOCW 
and DUCK HUNT. Fun for the very young and 
the young at heart. . .you'll love the bad 
guy that falls off the roof and the dogs 
fighting over the ducks. 

Star Cruiser 

STAR CRUISER is a fast action arcade game 
that can be played by ages 3 and up. 
SOTTALK magazine rated this one number 
three... need we say more? 

Cyber Strike 

CYBER STRIKE This is brand new game for the 
APPLE II... a hi-res action adventure in 
space with a full 48k of Assembly Language 
programming with animation and 3-D effects 
you haven't seen before. MIND BOGGLING! 
Everyone said a game like this wasn't 
possible on the APPLE II, but we did it. 
Also includes a real time clock (software 
implemented) and several levels of play. 
WARNI^G...THIS GAME REQUIRES PRACTICE TO 
PLAY SUCCESSFULLY! Uses either 13 or 16 
sector APPLE II, II+, or III. 



♦APPLE II is a registered tr?tierv>rk of 
Apple Computer, Inc. HIGHER TEOT is a 
copyrighted product of ^Synergistic 
Software. BOTH EARHELS, DUCK HUNT, 

HICH NOON, STW CHUISEn, snd CYBER 
STT^IKE are all copyrighted products of 
SISIUS SOFTWARE. AM rights reserved. 



Sirius Software | 

1537 Ho«re Atbl, Suite KXk SaaamentOb CA 95825 



HAS YOUR APPLE READ ANY GOOD 
PROGRAMS LATELY? 

APPLE II DISK SOFTWARE 

DATA BASE MANAGER 
IFO PROGRAM 

The IFO (INFORMATION FILE ORGANIZER) can be used for many 
applications such as: Sales Activity, Check Registers, Balance Sheets, 
Client/Patient Records, Laboratory Data Reduction, Prescription Infor- 
mation, Grade Records, Mailing Lists, A/R, Job Costing and much more. 
This can be accomplished without prior programming knowledge. 
Up to 1,000 records with a maximum of 20 headers (categories) and 10 
report formats (user defined) can be stored on a single disltette. Informa- 
tion can be sorted on any header, both ascending and decending In 
alphaynumerlc field. Mathematical functions can be performed on any 2 
fields to manipulate the Information. Information can be searched on 
any header using >,<, = >, = <, =, and first letter. Mailing list format 
provided. Fast assembly language Sort, Search and Read routines. 
Many error protection devices provided. Put your application program 
together in minutes instead of hours. 

Program Diskette and Instruction Manual $100 

Mailing List Program and Instruction Manual $40 

INVENTORY PROGRAM 

2 disk drives, menu-driven program. Inventory categories include: 
Stock#, Description, Vendor ID, Class, Location, Reorder PL, Reorder 
City., Oty. on Hand. All records can be entered, changed, updated, 
deleted, or viewed. Reports can be sorted In ascendlng/decending order 
by any category. There are 7 search reports (3 automatic). Calculates 
$ VALUE of Inventory and YTD, MTD, and period items sold, 
accumulates Inventory over a 13-month period. Requires a 132-column, 
seriai/parallei printer, total turnkey operation with bootstrap diskette. 
Program Diskette and Instruction Manual $140 

PAYROLL PACKAGE* 

2 disk drives, menu-driven program. Employee history include: Name, 
Address #, Address #2, City, State, Zip, Federal Exemption, State Ex- 
emption, Social Security #1, Date Employed, Oept. #, Code, Employee #, 
Status, Marital Status, Pay Rate, OT Rate, Vacation Rata, # Vacation 
Hours and Pension Plan. Program can generate weekly or biweekly 
payroll. Prints W-2, Qtr. Report, Pay Checks, Master and Current Flies. 
Federal and State witholding taxes are built Into program. Maintains a 
Cash Disbursement Journal, accumulates payroll for a 53-week period. 
Generates numerous type of payroll reports. Allows data to tie 
searched, sorted and edited. Prints Deduction Register and more. Main- 
tain up to 12S Employees/Expenses for quick and easy Payroll. 
Numerous error protection devices provided. 

Program Diskette and Instruction Manual $240 

•PLEASE SPECIFY STATE WHEN ORDERING 

APARTMENT MANAGER 

2 disk drives, menu-driven program written in assembly language and 
APPLESOFT II. All you will ever need to manage your apartment. 
Handles up to 6 Buildings with a maximum of 120 units each. Complete 
turnkey operation. Data categories Include Apt. #, Type, Tenant Name, 
Pets, Children, Security Deposit, Pet Deposit, Pool Deposit, Misc. 
Deposit, Rent Allowances, Date Moved In, Vacancy Date, Referral, Con- 
dition of Apt, Damage Amt. and Comment Line. Search, sort, enter, edit 
and vacate tenants. Maintains MTD and YTD rent receipts as well as 
complete utility reports, rent lost by vacancies. Maintains Expenses, 
Vacated Tenants Report and much more. 
Program Diskette and Instruction Manual $325 

PROFESSIONAL TIME AND BILLING 

2 disk drive program written in assembly language and APPLESOFT II. 
Completely menu driven. Maintain all billing of clients and personnel. 
Generates and Invoices. Numerous reports based on all types of 
criteria. Easy data entry for Rates, Clients, and Matters. Has Search, 
Sort, Change (on screen editing). View and Balance Fonward. If you are a 
Job Contractor, Attorney, Accountant, General Consultant, or anyone 
that needs to charge for time, this program Is a must. Complete turnkey 
operation. Many Reports are produced to aid in the Time Analysis 
Process. 
Program Diskette and Instruction Manual $325 

ALL PROGRAMS REQUIRE 48K and APPLESOFT II ON ROM OR AND 
APPLE II PLUS. ALL SOFTWARE IS COMPATABLE WITH PASCAL 
SYSTEMS. PROGRAMS RUN FROM ANY PORT OF THE COMPUTER 
WITH SERIAL/PARALLEL PRINTERS. REQUIRES 1 DISK DRIVE 
UNLESS OTHERWISE NOTED. 

SEND CHECK/MONEY ORDER or C.O.D. TO: 

SOFTWARE TECHNOLOGY for COMPUTERS 

P.O. BOX 428 

BELMONT, MA 02178 

(OR AVAILABLE FROM YOUR LOCAL DEALER) 
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SIRIUS SOFTWARE PRESENTS 

i4ction Software 
For The i4pple 

E-Z Draw 

E-Z DRAW is the software that started it 
all... the poor man's graphic tablet. But 
now it has been updated to 3.3 DOS and 
completely rewritten for the professional 
user. E-Z DRAW now includes the powerful 
HIGHER TEXT character generator written by 
Ron and Darrel Aldrich. With our new 
routines the fonts or any part of the 
picture can be flipped upside down, slanted 
left or right, rotated 90 or 180 degrees, 
mirrored or any combination of the above. 
Also the fonts or parts of the screen can 
be expanded in width or heighth, or 
compressed in heighth or width. You can 
mix portions of pictures together, or save 
only a portion of the screen on disk. Now 
fully keyboard controlled for better 
accuracy. Professional documentation and 
20 different and imaginative type styles 
included. Also included are commands to 
print the hi-res screen on the Trendcom or 
Silentype printers. Updates are available 
for the customer who already purchased E-Z 
DRAIV 2.0. The update is only $10.00 for 
those who return their original disk 
directly to us... please don't bug your 
dealer for the update. 



•APPLE II is 3 registered trademark of 
Apple Colflputer, Inc. HIGHER TEXT is « 
copyrighted product of Synergistic 
Software. Trendcom is a registered 
trademarH of Trendcom. Silentype is a 
registered trademark of Apple Computer, 
Inc. Z~2 DRAW is a copyrighted product 
of ?IRIUS SOFTWARE. Al! rights 

reserved. 



THE PERFORMANCE SLICE 






J ^nf,""" year „"'"»"■« 



s\on- 

ACCOUNTS 

PAYABLE COMING SOON! 

■*• Complete your accounting system with the soon to be released 
A/P package, featuring automatic application of credit and debit 
memos, open or closed item listing, full invoice aging, and 
multiple reports that provide a complete transaction review. 

■k Vbur bookkeeping doesn't have to be a bulky, complicated process. The 
SBCS Accounting System Is designed lor tiexiblilty and high pertormsnce 
with a cost effectiveness sure to benefit your businessi 

YOU NEED EXPERIENCE WORKING FOR YOU 
* PackagM avallabi* at your local Apple dealer. 



SMALL BUSINESS COMPUTER SYSTEMS 

41 <JOGri;enwood, Lincoln, WE 68504 (402) 467-1 878 



^FOR APPLE 2 
S&. APPLE 2 Plus 



r.-S^ 



Sirius Sofhurare 



A REAL TIME HI-RESOLUTION GRAPHICS GAME 

WITH SUPER SOUND EFFECTS. THREE 

SKILL LEVELS- NOVICE, AVERAGE ("Arcade" 

difficulty") and EXPERT WHERE ASTEROIDS ARE 

ACTUALLY ATTRACTED TO YOUR SHIP ! 



1537 Hows Ava. Suite 10«l Sociomsnla CA 95825 



Now Available 

32K TAPE $14.95 
32K DISK $19.95 

From Your Local 

Computer Store 

Or Send Order to: 



^B,^,^ G<opv..ghi 1980 

iU^dventure 

A DIVISION OF SCOTT ADAMS. INC 



DEALEfl INQUIRIES INVITED 
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Fun 
With 
OSI 



A checker game Is presented 
using Challenger C1P graphics 
and the polled keyboard 
techniques explained in William 
Taylor's series. 



Les Cain 

1319 North 16th Street 

Grand Junction, Colorado 81501 



I have been an avid fan of MICRO since 
August 79, and have enjoyed most of 
the articles. But everything is so 
serious, so come on let's have a few 
games. All work and no play makes 
Jack a dull boy. 

What follows is a Checker game 
that uses Ohio Scientific graphics. As 
listed, the program is written to work 
on the 4P and 8P, but with slight 
modification it will also work on the 
IP. The only differences are the video 
memory and the keyboard polling 
routines. The keyboard routines are ex- 
plained adequately in the Graphics 
Manual and in other articles written on 
the Ohio Scientific system, so I won't 
go into these routines. The video 
memory on the IP is IK with decimal 
32 between horizontal rows, while the 
4P and 8P have 2K of memory with 
decimal 64 between horizontal rows. 

I won't go into much detail as the 
listing explains the major program 
steps. Line 30 controls the video 
memory size and should be put in 
according to which computer is used. 
Line 310 reduces screen size to 32 x 32 
on the 4P and 8P, and should be left out 
for the IP. Lines 730 through 1220 are 



10 F0RI=lT03ia:PRINT!NEXT 

20 ST=533B7:iX=123 

38 REM 

40 REM ST=53:282 CC»64 FOR THE IP 

50 REM 

60 SU-STJ CD=(X^28 B8»SU+12*CC+3 

70 PRINTTfiB<10>i"»# CHECKERS **" 

30 FORI"1TO1O:PRINT:NEXTSFORT«1TO10088NEXT 

90 REM GET CK3ICE OF MEN FOR PLflVER 

100 REM ZlsPLJIVER KING Z4=C0«PUTER KING 

110 REM 

120 PRINT:PR1NT:INPUT"D0 VOU UfiNT RED OR BLfia<";HN« 

130 IF LEFr«<flN*, 1>="R" THEN Zl=82s 22-661 23=226! 24=4: GOTO 160 

140 IF LEFT«<FIN«, 1 ><>"B" THEN 120 

150 Zl>66:Z2=e2:Z3«4:Z4=226!G0T0 160 

160 PRINTsPRINTsPRINT" INSTRUCTIONS!" 

170 PRINT! PRINT !PRINT"MOyE FLflSHING CHECKER BOflRD TO MHN YOU" 

180 PRINT'-UflNT TO MOUE BV U <UP). D <DOUN>" 

190 PR1NT"R <RIGHT), L <LEFT). PRESS CfiRRlHGE RETURN." 

200 PRINT»THEN MOUE FLflSIHC SQUfiRE TO THE POSITION" 

210 PRINT"VOU UfiNT TO VKfiJE. TO HND PRESS CHRRIfiGE" 

220 PRINT-RETURN. IF VOO HflUE ANOTHER MOUE R FLflSHING" 

230 PRINT"CHEia<ER BOflRD UILL INDICATE WHICH MAN TO" 

240 PRINT"MOUE. IF NO MOUE CAN BE MADE PRESS SPACE" 

250 PRINT"BflR. A LINE FEED ENDS GAME EARLV. " 

260 PRINT!PRINT!PRINT" VOU ARE K "iflN*;" •<" 

276 PRINT: INPUT»TVPE C TO CONTINUE" ;AN« 

280 F0RI=1T03J5:PRINT:NEXT 

290 REM fUS STARTING PLACE FOR BOARD 

300 A-SUiB=A+i:3*CD>+3 

310 POKE56900. 0! REM TAKE OUT FOR IP 

320 DIM S<S,S;',R1<4:>-R<4> 

330 REM SETUP BOARD f«RfiV 

340 DATA 1>4. 1.4,0,4, -1.4,4,1, 4-3.4,-1. 4,-1, 15 

350 FORI=eTO7sFORJ=»0TO7:REflDX!IFX=15THEN370 

360 S<I.J)=X!C5OTO380 

370 RESTORE!READSi:I,J) 

380 NEXTJ. I 

390 B»="VOUR TURN"IC*="TRV AGAIN" 

400 REM 

410 REM START BOflRD DISPLflV 

420 REM SQUARES FIRST 

430 REM 

440 F0RI=1T04!F0RJ=1T03 

450 FORK=1T04:FORL=1T03 

460 POKEfi. 16i:iP0KEB, 161 

470 fi=fi+l!B=B+l!K«XTL 

480 A=A+3:B=B+3:NEXTK 

490 fi=fl+<CD-24)!B=B+<CD-24>:NEXTJ 

500 fi=A+<3*CD>i:B=B+<3*CD>!NEXTI 

510 REM BORDERS NEXT 

520 A=SU+3!B=SU+';?3*CD)!C=B 

530 F=SU+<3*CD:>:G=SU+23 

540 F0RI=1T04!F-0RJ=1T03 

550 POKEA. 135: POKES, 128 

560 A=A+liB=B+l:NEXTJ 

570 Fl=R+3iB=B+3:NEXTI 

580 FORI=1T04:FORJ=1T03 

590 POKEF , 1 36 ! POKEG .143 

600 F=F+CD:G=G+CD: NEXTJ 

610 F=F+<3*CD)!G=G+<3*CD>INEXTI 

620 REM corners; NEXT 

630 PC*CESU+':23H'CD).209!POKESU+23.207 

640 G=-l!R<05=-99 

650 P0KESU+<2S*CD)-3,32!REM CLEAR CURSOR 

660 REM POKE BOflRD ARRAV , ,. 

(continued) 
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(continued from page 6) 
Dear Editor: 

Here are BASIC pack program mods 
for KIM BASIC and Ohio Scientific 
BASIC-in-ROM. 

The program by George Wells 
"SYM-1 BASIC Pack Program" 
(MICRO 25:19) was an exceptionally 
welcome one, since most of us find oior 
desire for full documentation in con- 
flict with the limited memory space in 
our computer. As with many programs 
which interact with Microsoft BASIC, 
it is readily adapted to other implemen- 
tations on other 6502 machines. 

Make the following hanges in the 
references to BASIC intemal code: 





Ohio 


KIM 


Scientific 


Name address 


Supeiboard 


OUT.POINT $7A 


$7B 


GET.RAM $00 


SBC 


IN.RAM.PNT $256B 


$A4A7 


TEST.ALPHA $2F33 


$AD81 



REM and DATA remain the same. 
The other three intemal references 
occur sequentially in the program, 
beginning at $01 3B in the published 
program. These three, RST.BAS.PN, 
FIX.LIN.PN, and BASIC,WARM are 
replaced by one subroutine call. For 
KIM it is JSR $23EE and for Ohio Scien- 
tific Superboard it is JSR $A319. Due to 
the nature of the BASIC code at these 
points, this subroutine becomes an exit 
from the Pack program and you will be 
back in BASIC. The program's work- 
ings will be exactly as described in the 
article by Wells. To pack a program in 
BASIC workspace, exit to the monitor 
and GO at the start address of the pro- 
gram. Hit RETURN to fix the cursor 
and you can list your packed program, 
by typing LIST. 

The KIM version tested was 
assembled at $020E and the Ohio 
Scientific version was assembled at 
$0222. The page one location should 
work in both cases, but I have not tried 
this. 

Many thanks to George Wells for 
this practical program. Thanks to John 
Gibbins for the use of the Superboard to 
test the Ohio Scientific version. 

Sean McKeima 

64 Fairview Ave. 

Piedmont, California 94610 



670 GOSUB 1730 

630 REM COUNT JUMPS AND SEE IF GflTC OUER 

690 IFCl=12THEN167e 

700 IFPl»12THEN172a 

710 FORI=lTO9:POKEB0+I>nSC<mD«<B»,I))«NEXT 

720 REM POLLED KEVBOflRD ROUTINE 

730 Z=0 

740 Fl=l:F2=2 

750 REM DISHBLE CONTROL C POME 539,1 FOR IP 

760 POKE2073.%:K=«57ee8 

770 LO=SU+<22*t»>+HLl«a:Ul»0 

730 L2=L1-1:U2=<U1-1' 

790 KI=187 

300 REM THESE POKES RND PEEKS ARE DIFFEI«HT FOR IP 

Sie REM GET MOUE 

820 P0KEK,32:F='PEEK<K) 

338 PE=PEEK<LO:) 

340 POKELO.KI 

350 FORT=1TOS08NEXTT 

S6Q P0KEL0,32 

870 FORT=1TO501!NEXTT 

SS0 POKELO.PE 

390 REM L FOR LEFT 

900 IF F=64 THEN IF L1>0 THEN LX»Ll-l:L0-L0-3 

910 REM LINE FEED TO END GBME EflRLV 

920 IF F=16THEN POKE569e0- UENDsREM NO POtiE FOR IP 

930 REM CR TO INDICATE CHOICE MADE 

940 IF F=8 THEN FORT«lTO100sNEXTlGOTO 1890 

930 REM SPACE I3AR TO INDICATE NO MOOE 

960 P0KEK.2:IF PEEK<K>-16 THEN 127B 

970 P0KEK,64!IF PEEI«K>=4ANDZ=0 THEN 748 

980 P0KEK,t6!F=PEEK<:K> 

990 REM R FOR RIGHT 

1000 IF F»32 THEN IF LK7 THEN Ll-H+HLO-LO+3 

1010 REM U FOR UP 

1020 IF F=4 THEN IF Ul<7 THEN U1-U1+UL0-UJ-3HCD 

1030 P0KEKji2!lFPEEK<K)»16 THEN 1310 

1040 P0KEK..8:F=PEEK<K> 

1058 REM D FOR DOWN 

1060 IF F=64 THEN IF Ul>a THEN U1-U1-1ILO-LO*3«» 

1070 REM NO CHOICE GO AGAIN 

1080 GOTO 820 

1090 RKF1)=L1!R1<F2)»UI:IF L2-L1 OR U2-U1 THEN 1238 

liese KI=161IREM SOLID SQUARE TO INDICATE CHOICE 

11 10 L2=L1SU2=U1 

1120 IF Fl=l THEN F1«3:F2=«4»G0T0 820 

1130 E=RUl)8H=Rli:2> 

1140 H=Rl<3):Es=Rl<4) 

1150 IFS<E.H)«40RS<A,BK>e THEN 1640 

1160 S<n,B>=S<E<H>:SCE,H>»0IIFAeS<E-ftK>2THEN126a 

1170 S<';E+A>^:,<H+B>/'2)»a:Pl»Pl+llF2»4«Fl-3 

1130 Z=l 

1190 REM CLEAR PROMPT AND UPDATE BOARD 

1208 GOSUB 18T-8: GOSUB 1780 

1210 REM CHANtiE BACK TO CHECKERBOARD 

1220 KI = 187:GC»T0 820 

1230 A1=R1i:f1>:B1=R1<F2> 

1240 IFSi:Al.BO<>0ORABS<fil-Fl><>2CIRABS<Bl-e><>2 THEN 1640 

1250 E'A:Hi>B:F):°Al:B=«Bl>I«I+lS<G0TOU6e 

1260 IFB=7THDe<A,B)»2 

1270 IFP=lTHQ«OSUB1870«GOTO65a 

1280 REM UPDATE BOARD 

1290 GOSL© 13;'0s GOSUB 1780 

1300 REM COMPUTER'S TURN 

1310 FORX=0TO7;FORV«0TO7I IFS<X>V»-lTHENl34e 

1320 IF5<X,V>"-1THEMF0RA— lT01 STEP2 tBrG«CPSUBl»9lNEXIR .^ 

1338 IFS<X<V>==-2THENF0RA— lT01STEP2iFOR^-lT01STEP2tQOSUB135e«NEXTB.A 

1340 NEXTV,X:iJOTOlS10 

1350 U=X+R;U="r'+BsIFU<0ORU>7ORy<8ORU>7THEN14ae 

1360 IFS':U<U)=0THENGOSUBl418iCOTO148e 

1370 IFSi:U,U><0THEN1400 

1330 U=U+fl!U=iJ+B!lFU<aORU<80RU>70RU>7THEN14ae 

1390 IFS'CU.UJ'=0THENGQSUB14ie 

1400 RETURN 

1410 IFU=0RNDS<X,V)"-1THENQ-O*2 

1420 IFABS<V-U)=2THEN6WJ+5 

1430 IFV=7THEMQ=Q-2 

1440 IFV=0ORU=7THENQ=Q+1 

1450 FdRC=-lT01STEP2: IFU+C<a3RlW;>70Ry*G<BTHENl49e 

1460 lFS<U+C>U+G)<0THENQ»O+lIQOTO149e 

1470 IFU-C<0ORU-C>7ORU-G>7THEN1490 

1480 IFS<U+C,U+G>>0BND<S<U-C,U-G>-eOR<U-C-XANDO-G-V»THENO-O-2 

1490 NEXTC: IFQ>RC0>THEHR<a)-QtR<15-XlR<2>-VlR<3)-UlR<4>-U 

1500 Q=0i RETURN 

1510 IFR<0)=-99THEN1670 

1520 R<0)=-99 

1530 IFR<4)=eTHENS<R<3)>R<45)— 2IGOTO1550 

1540 S<R'C3),R<431'«CR<1>,R<2)> _.^„ 

1550 S<R<l),R<2)>»0:IFABS<R<n-R':3))<>2THENGOSUB178e«GOTO69e 

1560 S':<R<l>+R':3>>'2,<R<2)+R<4>)/^)-e«Cl«Cl*l 
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1570 X=R<3)SV=R<4>: IFSCX. V>=-lTHENB=-2lF0Rfi— 2TO2STEP41GOSUBJ610 

1580 IFS<X,V)=-2THENFORf)=-2TO2STEP4IFORB=-2TO2STEP4lCOSUB1610:NEXTB 

1590 NE;<TH:IFR<0K>-99 THENR<a)»-99:G0T0 1530 

1680 GOTO 670 

1610 U=X+fl!U=V+B:IFU<0ORU>7ORU<OORU>7THEN1630 

1620 IFS<U.U)=0flNDSi:X+fl/-2<V+B^2>>0THENGOSUB1410 

1630 RETURN 

1640 GOSUB1370!FORI=lTO9:POKEBO+I,HSC<MID«<C«i I)>!NEXT 

1650 E1=E1-1:FORT=1TO500!NEXTUGOSU81878iIFP<>ITHEN748 

1660 G0T0670 

1670 PRINT-CONGRfiTULRTIONS VOU UON" 

1690 REM RESTORE SCREEN SIZE HND CONTROL C 

1710 POKE56900>1:POKE2073. 173!END 

1720 PRINT"! UION TOUGH LUCK" 

1730 REM 

1740 POKE56900. 1 : POKE2073. 173: END 

175Q REM 

1760 REM POKE BOARD RRRR'y' 

1770 REM 

1780 D1=SU+<CD+1>:FORJ=7TO0STEP-1:FORI=0TO7 

1790 IFS<I,J)=4THENPCa<EDl-161IG0T01850 

1800 IF3a.J)=0THENPOKED1.32!GOTO1850 

1310 IFS':i.j:) = lTHENPOKEDl-Zl:GOTO1850 

1320 IFS< I , J)=-1THENP0KED1 , Z2:G0T01858 

1830 IFS<I.J)=2THENPOKED1.Z3:GOTO1850 

1840 IFSa-J)=-2THENP0KEDl.Z4 

1S50 Dl=Dl+3! NEXT: D1«D1 + 163! NEXT: RETURN 

1S60 REM CLEfiR PROMPT 

1370 FORI = lTO40:POKEB0+I-32iNEXT: RETURN 
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the polled keyboard routines for the 4P 
and 8P. There are sufficient REMARKS 
to change the PEEKs and POKEs, so 
that they match the IP's keyboard 
routine. Line 1710 and 1740 should be 
POKE 530,0 for the IP. The routines 
from line 1780 to 1850 POKE to the 
screen the present location of the 
player's and the computer's checkers. 



One final note: if you get tired of 
playing the game you can use the 
display to adjust your TV or monitor. 



Les Cain is employed by Bureau of Land 
Management as a Civil Engineering 
Technician where he received training in 
time-sharing microcomputers. 

jyGRo- 



WANTED! 

Good Articles 
and Good Photos 

MICRO Pays Very WeU! 

MICRO is committed to covering all 
of the 6502 systems. To do this well, 
we need a variety of articles on each 
system. We can always use more 
high-quality articles relating to AIM, 
SYM, KIM, Apple, Atari, PET/CBM, 
and Ohio Scientific systems. We are 
especially interested in good articles 
which apply to 6502 systems In 
general. 

Because we plan to use more 
illustrations than formerly, we 
encourage authors to "think 
pictoriafly" and to send us good line 
drawings and black and white photos. 

We are also looking for black and 
white photos which might stand 
alone, with a brief caption. Photos of 
6502 systems in vmusual business or 
professional environments would be 
especially welcome. Photos used 
independently of articles will be paid 
for separately. 

For details write or telephone: 

Editorial Department 

MICRO 

P.O. Box 6502 

Chelmsford, MA 01824 

617/256-5515 



"THE BEST" IS HERE! 
THE BEST OF MICRO - Volume 3 

The most substantial MICRO articles - 320 pages organized by major microcomputers. 

(Covers June through May 1980.) 
Suggested Retail $10.00 US and Canada 

YOUR MICRO DEALER HAS A COMPLETE rNDEX TO OUR "BEST OF" VOLUMES. 

AIM/SYIKKIM: Sharpen Your AIM * AIM 6522 Based Frequency Counter * Symbol Table Sorter/Printer for the AIM Assembler * A Perpetual Calendar Printer for 
the AIM * A Fonnatted Dump Routine for the AIM 65 * A Complete Morse Code Send/Receive Package for the AIM 65 -* An AIM.65 Notepad * Extending the 
SYM-1 Monitor * SYM-1 BASIC "GET" Command * SYMpla Memory Expansion * SYM-1 Staged Loading Technique for Segmented Programs * Expanding the 
SYM-1 ... Adding an ASCII Keyboard * Time of Day Clock and Calendar for the SYM-1 * SYM-1 Tape Verification * SYM-1 6532 Programmable Timer * Dual Tape 
Drive for SYM-1 BASIC * SYMple BASIC Data Files * The First Book of KIM — on a SYM * Expand KIM-1 Versatility In Systems Applications * KIM-1 Tape 
Recorder Controller * Card Shuffling Program for KIM-1 * EPROM for the KIM * KIM Scorekeeper * KIM — The Tunesmlth * Performing Math Functions In 
Machine Language * Clocking KIM * APPLE: The APPLE Stripper * Search/Change In Applesoft • Assembly Language Applesoft Renumber * Data Statement 
Qsnerator * Applesoft Renumbering * Common Variables on the APPLE II * How to do a Shape Table Easily and Correctly! * A HI-Res Qraph-Plotting 
Subroutine In Integer BASIC for the APPLE II * APPLE II HI-Res Picture Compression * Define Hl-Res Characters for ths APPLE II * An EDIT Mask Routine in 
Applesoft BASIC * Lower Case and Punctuation in APPLESOFT * Bl-Dlrectlonal Scrolling * Tape Execute File Create and Use * KIM and SYM Format Cassette 
Tapes on APPLE II * A Digital Thermometer for the APPLE II * The Color Qun for ths Apple II * APPLE II Speed Typing Test With Input Time Clock * Alarming 
APPLE * Life In the Fast Lane * Sorting with the APPLE II * Sweet-16 Programming Using Macros -* What's Where In the APPLE * Dlsasssmbllng the DOS 3.2 
* Intercepting DOS Errors from Integer BASIC * Applesoft II Shorthand * APPLE II Floating Point Utility Routines * OSI: Challenger II Cassette Techniques * 
Tokens * OSI BASIC In ROM * Shorthand Commands for Superboanj II and Challenger C1P BASICS * Polling OSI's Keyboard * OSI Fast Screen Erase under 
BASIC * Graphics and the Challenger CIP * A Large Digit Clock * Plotting and Moving Characters • Hypocyclolds * Some Useful Memory Locations and 
Subroutines lor OSI BASIC In ROM * Structured BASIC Editor and Pre-procassor * Streamlining the C2-4P ♦ A Real-Time Clock for OSI Disk Systems * How Do 
You Connect Peripherals to Your Supsrboard II * If You Treat It Nicely It Won't Byte * PETfCBM: Case of the Missing Tape Counter « Relocating PET BASIC 
Programs * MOVE IT: Relocating PET Source Programs and Object Code * A Machine Language Screen Print Program - for the Old (or New) PET * A 60XS0 Life 
for the PET • Speech Processor for the PET * Stop That PETI * Boolean Equations Reduced on the PET * Reading Pet Cassettes Without a Pet * Hooking PET 
to Ma Bell * PET Cassette I/O * Plotting a Revolution * New and Better PET User Port Printer Routines * Multiplexing PET's User Port * An Additional I/O 
Interface for the PET * GENERAL Replace that PIA with a VIA * To Tape or Not to Tape: What Is the Question? * 6522 Timing and Counting Techniques • Why a 
PET, APPLE, 6502 BASIC Compiler? A Simple Explanation -k The Binary Sort * Beginning Boolean: A Brief Introduction to Boolean Algebra for Computerlsts • 
Subroutine Parameter Passing * Program Checksum Calculator * A Simple Temperature Measurement Program and Interface * 

At Your MICRO Computer Dealer Now 
Complete your collection— -ask about 'Best of 1 and 2 



If your local computer dealer does not have an 
adequate stock of this volume, you may order direct. 
MICRO will pay the shipping charges (anywhere In the 
world) on these orders until March 31. Write or call: 



jycAo 

P.O. Box 6502 

Chelmsford, MA 01824 

(617)256-5515 
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OHIO 

SCIENTIFIC 

SUPERBOARri II S 279.89 
610 BOARD 8K: $ 279.90 

629 BOARD :£; 99.99 
(OS I BUS FOR 619::' 

630 BOARD $ 225.00 
(ADDS COLOR ETC.) 

C4P series 2 S 859.60 
C8P-DF-.32K S2339. 99 

AC29 COLOR MONITOR 

10 in. -NOT A TV-$399.00 

VISAj MASTERCHARGE-0. K, - 

SHIPPING AND INS. CHARGE 
ADDED TO CREDIT ORDERS. 
CHECKS MUST CLEAR BANK- 
BEFORE SHIPMENT: NO COD. 

*Jt::f::+::4!if:+* 

EU TECHNICAL SERVICE 

5380 PARIS GRAVEL RD 

HANNIBALj riO. 63401 

314-248-0084 



OHIO SCIENTIFIC 

TOUCH TYPING - 15 lesson 
set teaches you to use all let- 
ters and numerals without the 
need to look at the keyboard. 
Requires 32x&'l display. 8K. 
$19.95. 

FAILSAFE +2 - a sophisti- 
cated game based on the elec- 
tronic warfare environment en- 
countered by aircraft during 
nuclear war. 8K. $8.95. 
INTELLEGENT TERMINAL 
EMULATOR - down load, edit, 
then send files back to host 
computer. Full or half duplex, 
many other features. Disk sys- 
tems. $24.95. 

DS-PORT - 18 page data sheet 
shows how to add parallel ports 
to your CIP without a 610 
board. Includes photo posi- 
tives. $9.95. 

DS-20MA - Your CI P can use 
any ASCII 110 baud, 20MA 
periferal with the aid of this 14 
page data sheet. $8.95. 
Send for a FFIEE complete 
software and hardware cata- 
log. 

Aurora Software Associates 
-g-n P.O. Box 99553 
^ Cleveland, Ohio 44199 
iA> (216) 221-6981 




ADVENTURES 

for 

8K PET 

16KTRS80 and Color 80 

Fast, full-featured adventures. 

All done in BASIC 

with source provided. 

' ESCAPE FROM MARS — Explore an 

ancient Martian city while you prepare 

for your escape. 
' NUCLEAR SUBMARINE — Fast moving 

excitement at the bottom of the sea. 
' PYRAMID — Our most advanced and 

most challenging adventure. Takes 

place in our own special ancient 

pyramid. 
' VAMPIRE CASTLE — A day In old 

Drac's castle. But it's getting dark 

outside. 
' DEATH SHIP— It's a cruise ship - but it 

ain't the love boat and survival is far 

from certain. 

TREK ADVENTU RE — Takes place on a 

familiar starship. Almost as good as 

being there. 

$14.95 Each 
Aardvark Technical Services 

1690 Bolton 

Walled Lake, Ml 48088 

(313)624-6316 
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OHIO SCIENTIFIC USERS 

SOFTWARE - GAME AND UTILITY PROGRAMS FOR AS LOW AS $1.00. ALL 
WITH LISTINGS AND COMPLETE DOCUMENTATION. 

KITS - UPDATE YOUR COMPUTER TO PLAY MUSIC, INCREASE OPERATING 
SPEED, HIGH RESOLUTION GRAPHICS AND MUCH MORE. KITS INCLUDE 
PARTS AND COMPLETE ASSEMBLY INSTRUCTIONS. LOW AS $3.00. 

OUR $1.00 CATALOG INCLUDES OSI PROGRAMMING TIPS PLUS DESCRIPTIONS 
OF AVAILABL.E PROGRAMS AND KITS. 

MriTENDORF ENGINEERMG 905 VLLA NUEVA DR. LiTCHFELD PARK^Z^ 85340 
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Semi-Annual Index 

June - November 1980* (Issues 25 - 30) 

Articles 



Issue/Page 
AIM 

Share Your AtM Programs 25:23 

Jody Nelis 
AIM-65 File Operations 26:61 

Christopher J. Flynn 
Satellite Tracking with the AIM-65 27:13 

C.fl. MacCluer 
Loading KIM-1 Tapes to AIM 28:19 

Larry P. Gonzalez 
Compact 28:25 

Steve Bresson 
Tiny PILOT tor the AIM 28:59 

Larry Kollar and Carl Gutekunst 
An Improved Morse Code Receive Routine and Interface 29:23 

Marvin L. DeJong 

Biorhythm: An AIM BASIC Programming Exercise 29:51 

P.E. Burcher 
AIM 65 File Operations: Writing Text Files VKith BASIC 30:65 

Christopher J. Flynn 



Atari Notes 27:57 

William L. Colsher 
A Versatile Hi-Res Function Plotter for the Atari 400 & 800 30:47 

David P. Allen 



APPLE 

A Little Plus For Your Apple II 

Craig Peterson 
APPLE II Integer BASIC Program List by Page 

Dave Party ka 
BASIC and Machine Language Transfers with 
Micromodemll 

George Dombrowski 
TRACER: A Debugging Tool for the APPLE II 

R. Kovacs 
Zoom and Squeeze 

Gary B. Little 
Data Statements Revisited 

Virginia Lee Brady 
Better Utilization of Apple Computer Renumber and 
Merge Program 

Frank D. Chipchase 
Solar System Simulation with or without an Apple II 

David A. Partyka 
Applesoft Floating Point Routines 

R.M. Mottola 
Business Dollars and Sense in Applesoft 

Barton M. Bauers, Jr 
Creating Shape Tables, Improved! 

Peter A. Cook 
A Versatile Hi-Res Function Plotter for the Apple II 

David P. Allen 
Mean 14: A Pseudo-Machine Floating Point Processor 
the Apple (I 

R.M. Mottola 
PRINT USING for Applesoft 

Gary A. Morris 
Paged Printer Output for the APPLE 

Gary Little 
Cassette Label Program 

Dawn E. Ellis 
Step and Trace for the APPLE II Plus 

Craig Peterson 

ATARI 

Introducing the Atari 800 
William L. Colsher 



tor 



25:7 
25:37 

25:47 

25:59 

26:37 

27:7 

27:17 
27:33 
27:53 
27:65 
28:7 
28:49 

28:67 
29:14 
29:47 
29:65 
30:61 

25:35 



KIM 

VISA-KIM 

Joel Swank 
A "Stop-on-Address" Routine for KIM 

fl. MacDonald 

OHIO SCIENTIFIC 

Put Your Hooks Into OSI BASIC 

Edward H. Carlson 
Hypocycloids on the 540 

E.D. Morris 
Challenger II Communications 

Peter Koski 
Interface of OSI CI P With Heath Printer 

William L. Taylor 
A CI P and H 1 4 System, Part 2 

William L. Taylor 
An OSI Cheep Print 

Thomas Berger 
An Ultra-Fast Tape Storage System 

John E. Hart 
Ohio Scientific Users: Stop those S-'eRRORS 

E.D. Morris, Jr. and Tim Finkbeiner 

PET 

Lowercase Lister 

Rev. James Strasma 
PET-16 

Rev. James Strasma 
'Stop That PET' -Update 

George R. Gaukel 
Hello, World 

John Sherburne 
Son of Screen Print 

Kenneth Finn 
Auto-Run-Save, Y-t Plotter, Canary for the PET 

Werner Kolbe 
Define Your Own Fu notion Key on PET 

Werner Kolbe 
For Multiple File Tape Backups 

G.R. Boynton 
Self-modifying PET Programs 

P. Kenneth Morse 

SYM 

SYM-1 BASIC Pack Program 

George H. Wells, Jr. 
Slide Show for the SYM 

David P. Kemp 
SYM-1 Memory Search and Display 

Nicholas Vrtis 
SYM-Bell 

Randy Sebra 
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(continued) 



•MICRO'S volume year runs from June through May. Issue numbers span volumes consecutively, from MICRO'S first bimonthly 
issue (OctVNov. 1977) to the current monthly issue (No. 32). 
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GENERAL 

6502 Resource Update 25:65 

Dr. William R. Dial 
Sorting Revealed 26:13 

Richard C. Vile, Jr. 
Variable Lister 27:19 

Ray Cadmus 
Additions to Tiny Pilot 27:21 

Bob Applegate 
Nth Precision Add & Subtract With Adjusted Processor 
Status 27:27 

Lawrertce R. Go //a 
BCD Input to a 6502 Microprocessor 27:68 

Richard Saltero 



XREFER 28:34 

Joel Swartk 
Undedicating a dedicated Microcomputer 29:27 

David N. Barton 
Tiny Pilot Complemental (Co-Pilot) 29:32 

Robert Schultz 
Hexadecimal Printer 29:57 

LeRoy Moyer 
Programming with Pascal 29:59 

John P. Mulligan 
How to Use the Hooks 30:7 

Richard Williams 
John Conway's Game of Life Using Display Devices 
With Automatic Scrolling 30:53 

Theodore E. Bridge 



Departments 



The MICRO Software Catalog 
MikeRowe' 

6502 Bibliography 
Dr. William R. Dial 

MICRO Club Circuit 
MikeRowe' 

MICROScope 



Issue/Page 

25:71/26:71/27:71 
28:73/29:73/30:72 

25:75/26:75/27:75 
28:76/29:76/30:76 

25:68/26:68/27:25 
28:47/29:34/30:72 

27:31/28:57/29:49/30:33 



Microprocessors in Medicine: The 6502 
Jerry W. Froelich, M.D. 



29:56/30:36 



Up From the Basements 
Jeff Beamsley 

PET Vet 

Loren Wright 

Letterbox 

Editorial 

Robert M. Tripp 



27:59/29:72/30:51 

28:48/29:39/30:27 

26:60/27:56/29:6 
25:5 / 26:5 / 27:5 / 28:5 / 29:5 / 30:5 



'Mike Rowe is a pseudonym for material prepared by MICRO'S staff. 




COPIES THE "UNCOPYABLE" 

Not just another disk copy progreiin, The 
Locksmith makes a BFT by BIT copy of 
your dis;k. Duplication of just about any 
disk is possible with this program including 
"uncopyable" protected disks. 

ENVIRONMENTALLY SAFE 

The Locksmith works under DOS 3.2 or 
3.3 in either 13 or 16 sector environments 
and is compatable with disks created 
under EJasic, Pascal, Fortran, & other 
languages. Requirements are an APPLE U 
or APPLE [1+ with EITHER one or two 
drives. 

RELAX 

No longer do you have to worry about 
spills, staples, or magnetic fields that 
destroy your valuable diskettes. The 
Locksmith allows you to make backups of 
your mcjst valuable disks. 



APPLE DISK COPY 



PAYS FOR rrsH.F 

Time lost getting replacements of ruined 
disks, as well as avoiding outrageous 
charges for this service, will pay for The 
Locksmith in a short time. 

REPLACEMBST POLICY 

The Locksmith uses an advanced bit copy 
technique which is insensitive to currently 
used disk protection methods. The 
Locksmith will copy virtually ANY 
diskette with one notable exceptfon; 
ITSELF. Although we ship all disks with 
copies of the programi on BOTH sides, we 
realize that accidents happen. Therefore, 
we offer a simple, no nonsense 
replacement policy. If you fold, staple, or 
mutilate your copy of The Locksmith (or 
otherwise render your disk unusable), just 
return the original and $3.00 (for postage, 
packing, and handling) for a prompt 
replacement. 



ORDER TOLL FREE 

Mastercharge cind Visa users call 1-800- 
835-2246 Toll Free anytime. Kansas 
residents call 1-800-362-2421. Or send 
$74.95. Florida residents add $3.00 sales 
tax. 

OMEGA SOFTWARE SYSTEMS,INC 

1574 Ives Dairy Rd. 
No. Miami, Fla. 33179 

® Omega Software Systems 

APPLE is a registered trademark of Apple 
Computer, Inc. 



Dealer inquires invited. 
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NEW PRICES... 
NEW SOFTWARE for 

OHIOSeiENTinG 

IPrices effective Dec. 1 , 1980] 

WP6502 Word Processor Version 1.2 

Cassette (all systems) $ 50 

5 Inch diskette (all systems) S100 

8 Inch disk forOS65D Systems $100 

8 Inch disk for 0S65U Systems $100 

Programmed Instruction Training Course $ 25 

Uersion 1.2 Enhancements 

DQ Mail (D(V1S Interface) $ 75 

00 Duplicator (5" single drive copier) $ 30 

00 Duplicator for 8" $ 30 

DQ Justify (TTY & Diablo Logic) 

Diablo/Dume & all NEC Spinwriters 

S5D $ 50 

65U $ 50 

DQ Justify (TTY & Proportional Spacing) 

Parallel NEC Spinwriters & Centronics 737 

650 $ 50 

B5U $ 50 

DO Secretary. Owo's enhanced BSD $ 50 

DQ Secretary. Dwo's enhanced 65U for single user. 
timesharing and networking systems $250 

W/P6502 Word Processor Uersion 1.3 
(January 1 , 1980) 

65D $350 

65U $250 

(Vlulti-Usei- & Networking $500 

Programmed Instruction Training Course $ 25 

Descriptive Brochure for all products FREE 

Duvo Quong Fok Lok Sow 

23 East 20th Street 

New York City, IM.Y. 10003 

(212) 673-6310 




OSI 



PET 



Double your graphics for $99.00! 

PET 80 X 100 

OSI C2, C4, orC8 128 x 128 

OSI CI, or Superboard 64 x 128 

Easy to install — No assembly required 
Software included 

Call Now — Toll Free 
1-800-558-0870 

Mastercharge or VISA accepted 

Faragher Associates, Inc. 

7635 W. Bluemound Road 

Milwaukee, Wisconsin 53213 



"SPECIAL INTRODUCTORY OFFER** 
Programmable Character Generator Board $89.95 

You can use OSI's characters or you can make your 
own. Imagine you can now do true high resolution 
graphics 512 x 256 dots in the 64 x 32 screen format. 
And aii under your control! 

Other mods available — send for catalog. 

SOFTWARE (with Documentation) 
PC Chess V1. 9 $14.95 

Play Chess against your computer! 
Helicopter Pilot: (64 CHR Video Only) $ 8.95 

An Excellent Graphics Program! 
Golf Challenger $14.95 

From 1 to 4 players. Play a round of golf on your 18 hole 
golf course. One of the best programs I have ever seen! 
You can even design your own course. Comes with full 
documentation (14 pages). 

Two Very Intricate Simulations! 
Wild Weasel II: You operate a Sam Missile base during a 
Nuclear War. Not as easy as you think! You must 
operate in a three dimensionai environment. 
Failsafe II: The shoe is on the other foot! Here you are in 
the attacking bomber and you must penetrate deep into 
enemy territory. Can you survive? An extremely complex 
electronic warfare simulation! SPECIAL: both for 19.95 



VISA 



MASTER CHARGE 



Hardware: C1P Video Mod: Makes your 600 Video every 

bit as good as the 4P and 8P. Gives 32/64 CHR/Line with 

guardbands 1 and 2 Mhz. CPU clock with 300, 600 and 

12IX) baud for Serial Port. Complete Plans $19.95 

KIT(Hardware and Software) $39.95 

Installed: 32CHR - $79.95, 64CHR-$89.95 

Extra K of Video RAM for 64CHR not included! 

C1P Sound Effects Board: Completely programmable! 
For the discriminating hobbiest, the best board on the 
market for creating sound and music. Can be interrupt 
driven so that you can use it for gaming purposes. Has 
on board audio amp, 16 bit interval timer, 128 Bytes of 
RAM and two 8 bit parallel I/O Ports. 
Assembled and tested $89.95 Bare Board $39.95 

Both include Prog. Manual and Sample Software. 

C1P HI Speed Cassette Kit: Gives a reliable 300, 600, 
and 1200 Baud. No symmetry adjustments — the ideal 
fix for OSI's cassette Interface. Easily Implemented in 
30 minutes. Will save you time and money even the first 
night you use It! $12.95 

Many, many more. Send for Catalog with free program 
(Hard Copy) and BASIC Memory Map. $1.00. Two 
locations to serve you: 

Progressive Computing 

3336 Avondale Court, Windsor, Ontario 

Canada, N9E 1X6 

(519) 969-2500 

or 

3281 Countryside Circle, Pontiac TWP, Ml 48057 

(313) 373^468 
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This January issue of the Ohio 
Scientific Small Systems Journal 
contains two articles, both based on 
machine language (assembly) 
programs. 

The first article is an implementa- 
tion of two system memory tests. 
Both of the tests will run on all Ohio 
Scientific computers, video or serial 
based. 

The second feature this month is 
a compact Implementation of the 
game of Life for Ohio Scientific 4PMF 
computers. The same program may 
be used on 8PDF systems by chang- 
ing the origin in line 170 to * = $317E. 
Life was developed by Professor John 
Conway at the University of Cam- 
bridge and was first described in the 
"Mathematical Games" column of 
the October, 1970 Scientific 
American. 

Happy New Year! 

Small Systems Journal 

1333 S. Chiillcothe Road 

Aurora, Ohio 44202 



Memory Tests 

In this month's Small Systems 
Journal we are presenting two 
memory tests. The first test is a bit 
rotation test, while the second test 
uses a pseudo-random byte 
generator. The algorithms for each 
test will be explained in another part 
of the article. Either test will operate 
on all Ohio Scientific computers. 

The most appropriate time to use 
a memory test is when new memory is 
installed in the computer. For exam- 
ple, expanding a Superboard I! with 
4K RAM to a system with 8K RAM. 

On the other hand, there is no 
reason not to run an occasional 
memory test on an "up and running" 
computer. It gives you great peace of 
mind to have memory testing perfect- 
ly before you start any new major 
project. 
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650 














660 0274 


8506 


RTST3 STB 


DRTR 




SRVE <A> 


670 0276 


9104 




STR 


(MPOINT), 


V 


WRITE BIT PATTERN 


630 0278 


S104 




UDR 


(MPOINT), 


V 


GET DATH 


690 027R 


C506 




CMP 


DRTR 




SAME? 


700 027C 


D003 




BNE 


MERR 




NO, ERROR 


710 02 7E 


la 




CLC 






OK, CLR FOR NEXT 'ROL' 


720 027F 


90DF 




BCC 


RTST2 (BRR) 




730 














740 0231 


8507 


MERR 


STR 


ERROR 




ERROR DATA 


750 B283 


n945 




LDR 


»-E 




MARK ERROR 


760 0285 


28FI502 




JSR 


OUT 






770 02SS3 


4CSa02 




JMP 


m 




STOP EXECUTION 


730 




; 










790 




; 










800 328B 


H380 


SETPNT LDH 


nSTHRT 




SETUP 'MPOINT' 


810 02eD 


8504 




STH 


MPOINT 






320 023F 


fl501 




LDR 


MSTRRT-H 






830 0291 


8505 




STR 


MPOINT+1 






340 0293 


60 




RTS 








850 














860 0294 


43 


flDJPNT PHS 






SAVE <A> 


870 0295 


E604 




INC 


MPOINT 




BDJ 'MPOINT' 


830 0297 


D002 




BNE 


*+4 




NO PAGE CROSS 


890 8299 


E605 




INC 


MPOINT+1 




ADJ PAGE 


900 














910 029B 


n504 




LDR 


MPOINT 




TEST IF BLOCK DONE 


920 0290 


C50£ 




CMP 


MEND 






9 30 829F 


fl505 




LDR 


MPOINT+1 






946 0gftl 


E583 




SBC 


MEND+1 






950 0233 


63 




PLH 






RESTORE <fl.> 


960 92R4 


60 




RTS 






C=SET-BLOCK DONE 


970 




; 











CALL 1-800-321-6850 TOLL FREE 



SMALL SYSTEMS JOURNAL 



9sa 


Oafi= 9DCED8 


OUT 


STH *D0CE, X 


FOR OSI VIDEO 


998 


B£fi3 E8 




INX 




leee 


a2fi9 8D01FC: 




STH «FCB1 


FOR OSI SERIAL 


laie 


Banc 68 




RTS 




laae 










1830 






END 





PSEUDO-RHNDOM BVTE MEnORV TEST 










; " • ' 




'-'-''''' 


ji^f'iiiiiiii>iifff^iiiiiiifi^i>iiiiii 


70 






':■ TO 


RUN te: 


5T. PRESET 




SCI 








-MSTRRT' = FIRST 


HDDRESS TO BE TESTED ta, 1.1 - LO.HI 


90 








-MEND- 


= LRST 


BDDRESS TO BE TESTED +1 <Z. 31 - i.O, HI . 


lee 








STHRT EXECUTION 


BT 'ENTRV 


lie 














120 
170 
140 






' IF 


MEMORV 


TESTS OK, 


SERIES OF -X' WILL BE PRINTED 






I IF 


ERROR, 


-E' WILL 


BE PRINTED HND PROGRHM MILL STOP ' 


150 






i RES 


ET COMPUTER HND 


EXAMINE LOCATIONS: 


160 








'MPOINT' = MEMORV ADDRESS OF ERROR <4,3> - LO, HI 


170 








• DHTH ■ 


- CORRECT TEST DHTH <6> 


180 








•ERROR 


= ERROR 


DHTB <75 


190 














EO0 














£10 














220 














i30 






' PAGE 


ZERO LOCATIONS 




240 


0000- 






nSTRRT=0 


FIXED STHRT HDDRESS 


250 
270 


0002 = 






P1EHD -2 


FIXED ENDING HDDRESS 


0004 = 






nP0IHT=4 


TEST POINTER 


250 


0006- 






DHTH =6 


CORRECT DHTH 


c'9ei 
300 
310 
320 


0007 = 






ERROR "7 


ERROR DBTH 


0003 






RHND0n=8 


PSEUDO-RHNDOM DHTH WORD 


330 
340 


0240 






«=»240 


TEST ENTRV HDDRESS 


350 
368 


e2't0 


fi2FF 


RHDTST LPX 


tJFF 




370 


0248 


90 




TXS 




SET STHCK POINTER 


330 


0243 


ES 




INX 




INDEX FOR OSI VIDEO 


390 


0244 


P3 




CLD 






400 














410 


0243 


209FO2 


' RBTE 


ST JSR 


SETPNT 


SET -MPOINT' 


420 


0243 


RSe9 




LDR 


RHNDOM-H 


SAVE RHNDOM 


430 


024H 


43 




PHH 






449 


024B 


Hsas 




LDH 


RRHDOtI 




450 


024D 


43 




PHR 






460 














470 


024E 


303602 


RT. 1 


JSR 


RNBVTE 


GET RHNDOM DHTH 


480 


0251 


91B4 




STH 


< MPOINT .1, 


V WRITE TO BLOCK 


490 


0233 


2BFI302 




JSR 


HDJPNT 


NEXT LOCATION 


500 
310 
328 


0236 


90F6 




BCC 


RT. 1 


CONTINUE 


0233 


63 




PLH 






530 


8239 


8303 




STH 


RRNDOn 


RESTORE RANDOM 


540 


a23B 


68 




PLH 






550 


025C 


8309 




STB 


RHNDOM+l 




56B 


025E 


aaSFBS 




JSR 


SETPNT 


SET 'MPOINT' 


S70 


0261 


4C69a2 




JMP 


RT. 3 




530 














598 


0264 


2aH382 


' RT, 2 


JSR 


RDJPNT 


NEXT LOCATION 


608 


0267 


BB15 




BCS 


RT. 4 


DONE 


610 


0269 


2BS602 


RT. 3 


JSR 


RNBVTE 


GET RHNDOM DATA 


620 


e26C 


3SB& 




STB 


DHTH 




630 


026E 


B104 




LDH 


tnPOINTJ, 


V GET MEM DHTH 


648 


0270 


C3B6 




CMP 


DHTH 


SAME? 


6S8 
660 
670 


0272 


FBFB 




BEQ 


RT. 2 


VES, CONT 


0274 


8387 




STB 


ERROR 


NO, ERROR DATA 


688 


0276 


fl943 




LDR 


*'E 




690 


0278 


20B9B2 




JSR 


OUT 




700 
710 
728 


8276 


4C7B82 




JMP 


* 


STOP EXECUTION 


027E 


fl933 


' RT. 4 


LDH 


#'X 


BLOCK DONE, MHRK OK 


730 


0238 


2aS90£ 




JSR 


OUT 




740 
750 


8233 


4C4502 




JtIP 


RBTEST 


REDO TEST 


760 
770 


0236 


fl489 


' RNBVTE LDV 


RBNDOM+1 


RAND0M"<RAND0M*5)+1 Hr'OVRFLO 


730 


8233 


flses 




LDH 


RBNDOM 




790 


B23fl 


8603 




RSL 


RRNDOM 




SB8 


B23C 


2689 




ROL 


RflNDOM*! 


RANDOn*E 


818 


02SE 


26B8 




ROL 


RHNDOn 


WRHP OVERFLOW 


3E0 


0290 


2609 




ROL 


RHHDOM+1 


<RBND0M*e>»2 


338 






; 








340 


B292 


33 




SEC. 




SET FOR +1 


350 


0293 


6303 




HDC 


RANDOM 




360 


B293 


8S03 




STH 


RHMDOM 




878 


B297 


98 




TVH 






330 


8298 


6309 




RDC 


RHNDOM+1 




390 


029fl 


3309 




STB 


RHNDOM+l 


RHND0M»<<RHND0M*2)H.2>+RBND0HH 


908 


B29C 


Reeo 




LDV 


»e 


CLEAR <¥) 


918 


BS9E 


60 




RTS 






928 






; 








930 






i 








940 


029F 


H300 


SETPNT LDH 


MSTHRT 


SETUP -MPOINT' 


950 


B2F11 


3304 




S.TB 


MPOINT 




960 


B2fi3 


asai 




LDR 


M3TRRT+1 




970 


a2H3 


S303 




STH 


MPOINT-M 




930 


02S7 


60 




RTS 






990 














1000 


B2HS 


43 


' fIDJPNT PHB 




SAVE <R) 


1018 


B2fl9 


E6B4 




INC 


MPOINT 


BDJ -MPOINT' 


1028 


02HS 


D002 




BNE 


»+4 


NO PAGE CROSS 


1030 


02HD 


E603 




INC 


MPOINT+l 


BDJ PBCE 


104B 














1050 


02nF 


H3e4 




LDR 


MPOINT 


TEST IF BLOCK DONE 


1060 


02B1 


csea 




CMP 


MEND 




1078 


0283 


R3B3 




LDR 


MPOINT+1 




1030 


0283 


ESe3 




SBC 


MEND+1 




1890 


0237 


63 




PLR 




RESTORE CH) 


1100 


02B3 


68 




RTS 




C=SET-BLOCK DONE 


1110 






; 








1J20 


02B9 


9DCED0 


OUT 


STH 


»D0CE, X 


FOR OSI VIDEO 


1130 


02BC 


ES 




INX 






1140 


02BD 


SDeiFC 




STH 


»FC01 


FOR OSI SERIAL 


1138 


02C0 


68 




RTS 






1160 






j 








1170 








. END 





Bit Rotation Test 

The bit rotation test uses the 
following five step algorithm: 

1) Initially, set all memory 
under test equal to zero. 

2) If location under test is not 
zero, error. 

3) Rotate single bit through 
byte location (1, 2, 4, 8, etc.) 
and test if OK; if not OK, 
error. 

4) Set location equal to FF^^, 
and advance to next 
location. 

5) Continue test pass at Step 2. 

This test is very useful for 
locating address line short circuits. 
This is because every byte to be 
tested should be zero prior to the 
rotation test. If there is an address 
line short, setting the current byte 
under test (in Step 4) to hex FF will 
cause another byte higher in memory 
to also become hex FF. This test is 
also handy for easy identification of a 
totally defective memory chip since 
only one bit is examined at a time. 

Pseudo- Random Test 

The pseudo-random data test 
uses the following test algorithm: 

1) Write pseudo-random byte 
to location under test. 

2) Advance to next location 
and continue with Step 1 
until all memory under test 
has been written with the 
pseudo-random sequence. 

3) Restart at initial test 
location. 



^ 



4) Using same pseudo- 
random sequence, verify 
each location has not 
changed; if changed, error. 

5) After all memory under test 
has been verified, restart at 
Step 1 with new pseudo- 
random sequence. 

The pseudo-random test has the 
advantage, with respect to the bit 
rotation test, that it is very sensitive 
to data "pattern sensitivity". This 
means that "typlcar RAM data is 
usefully approximated. A disadvan- 
tage of this type of test is that many 
complete passes of the test must be 
completed to assure good memory. 
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Running the Tests 

Each test is a very basic "bare 
bones" program. The starting and 
ending addresses of the nfiemory to 
be tested must be preset before run- 
ning the test. Upon completion of 
every test pass, an "X" will be 
displayed at your terminal device. If 
an error should occur, an "E" will be 
displayed and the test will stop. 

To determine the cause of the 
error, the computer must be reset and 
the contents of memory at locations 
4, 5, 6, and 7 examined. This will con- 
tain the address of the error (4 and 5), 
the expected data (6) and the data 
actually found in memory (7). 

A couple of examples should 
clarify the test procedure. If memory 
between hex 0300 and hex 07FF in- 
clusive is to be tested on a C4P, C1P, 
etc., the procedure would be as 
follows: (note: <CR> means 
RETURN) 

1) enter the desired memory 
test into memory 

2) Reset your computer and 
type M 

3) Type — .0000/00 <CR>03 
<CR>00<CR>08 

4) Type — .0240 G 

The test should begin execution 
and after several seconds, if all is 
well, begin to display a series of "X"s. 

To demonstrate an error condi- 
tion, use the following procedure: 

1) enter the bit rotation test 

2) reset your computer and 
type M 

3) type — .0000/00 <CR>FE 
<CR>00<CR>FF 

4) type — .0240 G 

Using this method (testing ROM) 
an error ("E") should occur im- 
mediately. Reset your computer and 
examine memory using this 
sequence: 

type — .0004/ display — 00 
<CR>display — FE 
<CR>display — 00 
<CR>display — A2 



t- 



SB 
30 




; 


LIFE PROGRnn FOR C4P MF 


DEae 


B 


CTLREC-»DE00 


43 


oFa0 




KEV 


««DF00 


■58 




; 








60 


0001- 


ROM 


-«01 




70 


oeas- 


START -«05 




108 


0040' 




COLUnN-«40 




00FF= 


HOLD "tFF 




110 


asFE- 


COUNT =«FE 




liO 


BBFC 


s 


TEHP -«FC 




ij.O 


80FR. 




VlDSCR"*Ffi 




^■^z 


OBFB- 


VIDBUF»«F8 




150 

it.e 


08F0- 


SEED -»F0 




3e7E 




*-»327E 




1 :-^-s 


3a7E 


(1905 


LOR 


tSTRRT 


INITIALIZE RANDOM NUMBER 


1 '^O 


3330 


8SFB 


SIR 


SEED 




C-M 


3232 


85F4 


STR 


SEED+4 




elf 




; 








.- C'fi 


3234 


soesDE 


SIR 


CTLREG 


TURN ON COLOR* WIDE SCRE 


£36 




't 








i'48 


3237 


204233 NEM 


JSR 


INIT 


RESET POINTERS TO BEGIN 


J 513 










BLOCK MOVE 


His 




J 








;---8 


328H 


BIFS COPV 


LDR 


<VIDBUFJ.V i COPV BUFFER CONTENTS 


E!<8 


323C 


SlFfl 


STR 


<VIDSCR)- V i TO COLOR SCREEN 


.=■'^0 


323E 


20S533 


JSR 


nOVEUP 




-".10 


3291 


D0F7 


BNE 


COPV 




?1 Ci 




; 








■jL-e 


3293 


204233 


JSR 


INIT 


RESET POINTERS TO BEGIN 


3fl 










NEM GENERATION 


5310 












JJ© 


3296 


fl9Bl 


LDR 


«ROM 


CHECK FOR EXIT KEV 


Sse 


3298 


SDeeOF 


STR 


KEV 


BEFORE UE GET TOO 


:n;-a 


329B 


floeeDF 


LDR 


KEV 


FAR ALONG 


s:^ 


329E 


2948 


AND 


»C0LUI1N 




jse 


32f)e 


Feei 


BEO 


SAME 




390 


32ft2 


60 


RTS 






•100 




i 








tie 


3203 


flSFn snnE 


LDR 


VIDSCR 


SETUP TEMPORRRV POINTER 


4?0 


32fl5 


85FC 


STR 


TENP 


FOR CURRENT CELL 


430 


32fi7 


flSFB 


LDR 


VIDSCR+1 


440 


3209 


85FD 


STH 


TEMP+1 




450 












460 


32BB 


A9ee 


LDR 


«e 


CLEAR NEIGHBOR COUNT 


4 re 


32HD 


85FE 


STH 


COUNT 


FOR THIS CELL 


480 




> 








490 


32ftF 


283733 


JSR 


LOOKUP 


READ CURRENT CELL 


580 




i 








?10 


32B2 


flSFE 


LDR 


COUNT 


REMEMBER IF IT STARTED 


SS0 


32B4 


48 


PHR 




OUT DEAD OR HLIVE 


530 




i 








540 


32B5 


R9ei 


LOR 


•1 


LOOK IN ALL EIGHT 


5S0 


32B7 


2aiE33 


JSR 


RHERD 


DIRECTIONS AND 


S60 


32BR 


n94e 


LDR 


•64 


COUNT THE NEIGHBORS 


5.-0 


32BC 


2eiE33 


JSR 


RHERD 


RS UE GO 


580 


32BF 


fl9ai 


LDR 


•1 




590 


32C1 


2e2n33 


JSR 


BEHIND 




COS 


32C4 


1=1991 


LDR 


tl 




6ie 


32C6 


202^33 


JSR 


BEHIND 




620 


32C9 


n94e 


LDR 


«64 




630 


32CB 


2e2R33 


JSR 


BEHIND 




€.40 


32CE 


R948 


LDR 


•64 




650 


32D0 


232R33 


JSR 


BEHIND 




foe 


32D3 


R9ei 


LDR 


•1 




670 


32D9 


2eiE33 


JSR 


RHERD 




S>a0 


32D8 


fl9ei 


LDR 


•1 




^-90 


32DR 


201E33 


JSR 


AHEAD 




700 




; 








716 


32DD 


68 


PLR 




RESTORE CURRENT CELL 


r.£e 


32DE 


88 


PHP 




STATUS — ASSUME ITS DEAD 


730 


32DF 


nsBE 


LDR 


•14 




740 


32E1 


23 


PLP 






750 


32E2 


43 


PHR 






769 


32E3 


0824 


BNE 


flUVE 





CALL 1-800-321-6850 TOLL FREE 



SMALL SYSTEMS JOURNAL 



o 



■. ;^0 


32ES 


flSFE 




LDR 


COUNT i 


COMES TO LIFE IF EXHCTLV 


?9e 


3aE7 


C903 




CUP 


«3 ; 


THREE NEIGHBORS 


368 


3SE9 


Dess 




BNE 


UPDATE 




sie 






i 








3c0 


32EB 


6a 


RRNDOn 


PLR 


; 


IT'S NOT DERD <VET!> 


S3e 


3SEC 


38 




SEC 






SJ0 


32ED 


BSFl 




LDH 


SEED+1 i 


GET R RHNDOM COLOR 


sr.e 


3SEF 


65F4 




RDC 


3EED'»4 > 


IN ITS HONOR 


■i6& 


32F1 


65F5 




RDC 


SEED*5 




370 


32F3 


85F0 




STR 


SEED 




see 


32F5 


8fl 




TXR 






898 


32F6 


48 




PHR 






?ee 


32F7 


fl£04 




LDX 


•4 




919 


32F9 


BSF9 


MOVE 


LDR 


SEED> X 




'H^B 


32FB 


9SFt 




STR 


SeED*l< X 




■Sj:6 


32FD 


CH 




DEX 






9ae 


32FE 


iaF9 




BPL 


MOVE 




■sse 


3300 


68 




PLR 






9*8 


3301 


Rfl 




TRX 






970 


3302 


R5Fa 




LDR 


SEED 




9S8 


3304 


0901 




ORR 


•1 




9?0 


3306 


48 




PHR 






1808 


3307 


D0afl 




BNE 


UPDHTE i 


PUT IT flURV 


1018 






j 








18,?0 


3309 


n5FE 


ALIVE 


LPH 


COUNT i 


IF HLREHDV RLIVE- IT 


1038 


3306 


C9a3 




CMP 


•3 i 


STRVS THHT WHV IF 


1040 


330D 


3004 




em 


UPDHTE i 


S. 3< OR 4 NEIGHBORS 


10S0 


330F 


C906 




CMP 


•6 




1068 


3311 


3008 




BMI 


RHNDOM 




1870 


3313 


68 


UPDHTE 


PLR 


; 


UPDHTE CURRENT CELL 


1880 


3314 


91F8 




STR 


<VIDBUF5, V 


1090 






1 








1100 


3316 


205533 




JSR 


MOVEUP i 


HOVE TO NEXT CELL 


1118 






i 








iiee 


3319 


D03S 




BNE 


SRME 1 


KEEP GOING 


1138 


331B 


4C8732 




JMP 


NEW 




1140 






1 








11S8 


331E 


18 


ftHEHD 


CLC 


i 


HOVE HHEHD IN TEMPORRRV 


13 cS 


331F 


65FC 




RDC 


TEMP i 


POINTER 


i3:'0 


3321 


85FC 




STR 


TEMP 




1138 


3323 


9802 




BCC 


*** 




13 va 


332S 


E6FD 




INC 


TEMP-vl 




IJPO 


3327 


4C3733 




JMP 


LOOKUP 




1S18 






; 








i^i'O 


33SH 


33 


BEHIND 


SEC 


; 


MOVE BRCK IN TEMPORRRV 


IS'sO 


332B 


85FF 




STR 


HOLD : 


POINTER 


iE4e 


332D 


fl5FC 




LDR 


TEMP 




i:--50 


332F 


E5FF 




SBC 


HOLD 




ic-sa 


3331 


S3FC 




STR 


TEMP 




■12 70 


3333 


6082 




BCS 


*-i-4 




.i;:as 


3335 


C6FD 




DEC 


TEMP-H 




1298 






j 








3 008 


3337 


BIFC 


LOOKUP 


LDR 


<TEMP>, V 




3 -.MO 


3339 


29BF 




RND 


*15 i 


SEE IF TEMPORRRV CELL 


3 ;• j:o 


333B 


C90E 




CMP 


»14 ; 


IS ALIVE RND COUNT IT 


137-8 


333D 


Fe0S 




BED 


**4 




1743 


333F 


E6FE 




INC 


COUNT 




1358 


3341 


68 




RTS 






1368 






; 








■.'.-70 


3342 


fl933 


INIT 


LDH 


«»33 


INITIALIZE POINTERS 


ll'^e 


3344 


3SF9 




STR 


VIDBUF+1 




3 3'>8 


3346 


fl97E 




LDR 


«»7E ; 


BUFFER •«337E 


3 4^0 


3343 


83F8 




STR 


VIDBUF 




3 318 


334H 


H9E0 




LDR 


««E0 




]4^^0 


334C 


85FB 




STR 


VIDSCR-H 




3-138 


334E 


Raea 




LDV 


*«00 


SCREEN ««E000 


3-48 


3350 


a4FR 




STV 


VIDSCR 




3 4'.0 


3352 


8208 




LDX 


•S 


COUNT 8 PRCES 


3 46,8 
14?u 
3 4;? 8 


33S4 


60 




RTS 






3355 


C3 


MOVEUP 


INV 


J 


MOVE POINTERS FORWRRD 


1490 


3356 


0005 




BNE 


OK 




3=08 


33SS 


E6F9 




INC 


VIDBUF-H 




3 t3 6 


3350 


E6F8 




INC 


VIDSCR+1 




3;.£8 


335C 


Cfl 




DEX 






i'jJB 


335D 


60 


OK 


RTS 







This tells you that at location 
FEOO16 a zero was expected to be in 
memory, but A2i6 was found to be in 
that location instead. 

A similar error could be generated 
using the pseudo-random test, but 
the test data at location 6 would vary. 

A complete assembly listing of 
both the bit-rotation test and the 
pseudo-random data test is given. 
Please note that these tests are both 
assembled at hex 0240. If you wish to 
have both tests in memory at the 
same time, one or the other must be 
re-assembled. 



The Game of Life 

Life Is perhaps the simplest simula- 
tion program around today. Life, as 
the name implies, deals with a life 
and death generation process based 
on a primitve cell which, in this im- 
plementation, translates to a location 
of video memory. If a cell starts out 
alive, that is, in color, then It will re- 
main so if it is adjacent to 3, 4, or 5 
other live cells. If a cell starts out 
dead, that Is, black and white, then it 
will remain so unless adjacent to ex- 
actly three live cells. Thus, while the 
program is running, the screen shows 
a color pattern of the living ar>d dead 
cells as each generation passes. As 
the program is set up, approximately 
1.5 generations will be generated per 
second. However, if the random 
number generation is replaced by a 
single default color, execution is con- 
siderably quicker. (In fact, the random 
number generator was added to slow 
the program enough to observe the 
pattern changes.) Before running, the 
initial pattern may be entered into 
locations $337E-$3B7D which corres- 
pond directly to the color video at 
$E0O0-$E7FF. 

To run the program, enter it as 
listed in the assembler, assemble it 
using "A3", and execute by typing 
"!G0 327E". The display will then 
show a pattern of live and dead cells 
changing more than once a second. 
To stop the program at any point, 
press the CONTROL key. You may 
then make any observations you wish 
on your "culture". To re-enter your 
program, again type "!G0 327E" and 
the program will continue with the 
next generation. 



OHIO SCIENTIFIC 1333 S. Chilllcothe Road • Aurora, Ohio 44402 • (216) 831-5600 




GALAXY SPACE WAR I 



Galaxy Space War 1 (WARD is a game of strategy in wtiich the player has complete 
control ol his space fleet s tactical maneuvers. Each fleet bailies its way toward the 
opponents galaxy m an attempt to destroy it and win the war WAR1 simulates the 
actual environment encountered in a space war between two galaxies Optimum use 
IS made ol Apples high resolution graphics (HIRES) and colors in displaying the 
twinkling stars universe, the colored ships of each fleet, long range sensors colored 
illuminations, and the alternating blinking colors used in battles between ships 
Complementing HIRES are the sounds of war produced by Apple s speaker 

WARl IS played between Apple and a player or between two players You may 
play with total knowledge of each others fleet or only ships sensor knowledge o* 
the opponents fleet Each player builds his starting lleet and adds lo it during the 
game This building process consists of creating the size and shape of each ship 
positioning it, and then allocating the total amount of energy for each ship 

During a player s turn he may dynamcially allocate his ships total energy between 
his screen /detection and attack/move partitions The percentage of the total energy 
allocated to each partition determines its characteristics The screen/iJetection 
partition determines how much energy is in a stiip s screens and the detection sector 
range of its short range sensors The attack/move determines the amount of energy 
the ship can attack wilh. its attack sector range, and the number of sectors it can 
move m normal or hyperspace 

When an enemy ship is detected by short range sensors, it is displayed on the 
universe and a text enemy report appears The report identifies the ship, its position 
amount ol energy in its screens, probable attack and total energy, a calculated de- 
tection/attack/move range, and size of the ship Also shown is the number of days 
since you last knew these parameters about the ship When a ship s long range sensor 
probes indicate ttie existence of an enemy presence at a sector in space, this sector 
is illuminated on the universe. 

An enemy ship is attacked and destroyed wilh attack energy. It your attack energy 
breaks through his screens, then his attack energy is reduced by two units of energy 
tor every unit you attack with A text battle report is output after each attack The 
program maintains your ship s data and the latest known data about each enemy 
ship Vou may show either data in text reports or display the last known enemy posi- 
tions on the universe. You can also get battle predii:tions between opposing ships. 
The text output calculates the amount of energy required to destroy each ship for 
different energy allocations 

APPLET II, 48K, APPLESOFT tt GALAXY 

ROM CARD, DISK II DOS 3.2 S DEPT. MI3 

WARl DISK & MAMUAL ...$39.95 P.O. BOX 22072 

(CA residents add 6% sales tax] SAN DIEGO, CA 92122 
Write or call for more information (714) 452-1072 



NIKROM TECHNICAL PRODUCTS PRESENTS 

A DIAGNOSTIC PACKAGE FOR THE APPLE II 

AND APPLE 11+ COMPUTER. 

"THE BRAIN SURGEON" 

All major computer systems are checked for functional tiardware analysis on a 
regular basis for logical as well as some practical reasons. Finding what Is exactly 
wrong can account for most ol the money consuming down-time. 

Apple Computer Co. has provided you with tfie best equipment available to date. 
The Diagnostic's Package was designed to check every major area of your computer, 
detect errors, and report any malfunctions. Tha Bnin Sutgaon will put your system 
through exhaustive, thorough procedures, testing and reporting all findings. 
The Tests Inolude: 

• MOTHERBOARD HOK/t TEST FOR BOTH APPLE II AND APPLE II + 

• APPLESOFT CARD TEST • INTEGER CARD TEST • MEMORY BAM TEST 

• DISK DRIVE ANALYSIS • MONITOR ALIGNMENT 

• DC HAYES MICRODODEM II TEST 

System Diagnosis is an invaluable aid to your program library even if your system 

is working fine. Hours have been wasted trying to track down a "program bug" when 

actually hardware could be the blamel 

The BnIn Surgeon allows you to be confident of your system. This can be critical 
when file handling, sorts or backups are Involved. You must depend on your 
computer during ail these critical times. Running Tha Brain Surgaon prior to these 
Important functions helps to insure that your system is 
operating at peak performance. 

Tha Brain Su^eon is easy to use 
and supplied on diskette with 
complete documentation. 

PRICE: saax 

REQUIRES: 32 0f48K 
APPLESOFT; 1 Disk Dnve 

Nikrom Technical Products 

25 pnOSPECT STREET * LEOMINSTER, MA Ot4S3 

APFn.E la Registered 
TrademwK ol Apple Convutw Co. 
MICROMODEM II is Registerod 
TreOamark of D.C. HAYES 




APPLE II PROGRAM 

FIRST TIME EVER 

*• VU #3 *• 

VU #3 will allow the User to enter data into 
VISICALC* fronn any progrann by inserting data In- 
to a file. Then the program places the file Into 
VISICALC* (well documented in the Instr.) 

VU #3 will also transfer data generated from 
VISICALC* Into any of the User's programs. 

•VISICALC Is a Trademark of 
Personal Software, Inc. 

$69.95 plus $4.95 p. & h. 

PROGRESSIVE SOFTWARE 

P.O. Box 273 
Ply. Mtg., PA 19462 

PA Residents Add 6% Sales Tax 
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AMCftO 

Software Catalog: XXVIII 



Name: Disk Copy /Disk Space in 

ROM 

System: Basic Apple II or Apple II 

Plus 
Memory: 32K or 48K 
Language: Assembly (ROM Chip) 
Hardware: Mountain Hardware's 
ROMPLUS Board Disk II 
with 3.2 or 3.3 DOS 
Description: Plug this ROM into your 
ROMPLUS board and this utility will 
be a keyboard command away from 
your immediate use. Two disk utility 
programs on one ROM chip. DISK 
COPY will duplicate a disk with one 
disk drive, tviro disk drives with one 
controller, or two drives and two con- 
trollers. Initialization and volume 
number change are selectable. When 
DISK SPACE is activated it will read 
the track bit map on a disk and display 
the number of free sectors and bytes 
still available for use. The DISK SPACE 
routine will also allow you to read or 
write to any sector, on any track, from 

O assembly language. Will operate with: 
DOS 3.2 or 3.3, 32K or 48K, Int, 
FP, LS, II or II Plus. Applesoft 
Renumber/Merge in ROM also 
available. 

Copies: Many 

Price: $49.95 

Includes: Llser Documentation and 

ROM Chip 
Author: Frank D. Chipchase 
Available: Soft CTRL Systems 
P.O. Box 599 
V/est Milford, NJ 07480 



Name: Single Disk Copy Utility 

System: OSI CI, C4 

Hardware: Disk with 24K - 32K 
Description: A copier for most users. 
Copies OS65D disks with or without 
assembler and monitor, OS-MDMS 
system and OS-MDMS data disks, 
based on the directory. Copies only the 
first sector on a track except for the 
multi-sectored tracks in the operating 
systems |6 and 12). Simple to use with 
prompts. 32K system copies 8 tracks at 
a time. Makes multiple copies. Does 
not copy track 0, something we should 
all understand how to do. 
Price: $9.95 

Author: Kenneth Madell 

Available: Earthship 

P.O. Box 489 

Sussex, New Jersey 07461 



Name: 32K Apple Pi 'Life' 

System: Apple II 

Memory: 32K RAJ\/1 Minimum 

Language: Integer BASIC, Machine 

Language 
Hardware: Cassette Drive or Disk II 
Description: Hi-Res grid size up to 
64x64. Speed from 10 to 60 genera- 
tions/minute at 64 X 64 grid size. Over 
100 pre-defined objects as given in 
various computer magazines. Options 
and sub-options are chosen by capital 
letters given below. The Modify option 
allows Build constellation. Create ob- 
ject. Delete constellation, Erase object, 
and Get object from grid. The Grid 
storage option allows Get grid from 
available storage (30 grids for 48K &. 
DOS) or Put grid in storage. An Inspec- 
tion option allows Objects, Constella- 
tions, or Grids to be automatically 
displayed for inspection or deletion. A 
Plot option allows Objects, Constella- 
tions, Hollow and Solid blocks, Lines, 
and Random points to be plotted on the 
grid. The Transfer option allows tables 
to be Loaded or Saved and grid storage 
to be Read or Written, using either 
Cassette or Diskette. Finally, there are 
Zero grid and Continue 'Life' genera- 
tion options. 
Price: $10.00 lor cassette or 

$12.50 for diskette. 
Author: Hany L. Piuetz 
Available: Miciospa^n Software 

709 Caldwell St. 

Yoakum, TX 77995 



Name: STOCKPLOT, 

COMPLOT 

System: PET/CBM 

Memory: 8K to 32K 

Language: BASIC 

Hardware: PET/CBM, disk, 2022 

printer. 
Description: Plots stock and commodi- 
ty price histories. Allows data base up- 
date by user to keep plot current. One 
year's price history included on disk. 
Data smoothing and digital filtering 
provide trend reversal indication. 
Price: $50 for Dow Jones 

Industrials. Other stock 
prices on :request. 
Author: Samuel P. Cook 

Available: Cook Compusystems 
309 Lincolnshire 
Irving, Te:sas 75061 



Name: Disk Utilities 2.1 

System: Apple II 

Memory: 48K and ROM Applesoft 

Language: Applesoft and Machine 

Language 
Hardware: Disk II 
Description: A menu driven collection 
of five utility programs. All programs 
work with DOS 3.2 and DOS 3.2.1. 
Copy — creates backup copies of your 
important program and data disks. 
Compare— verifies that a diskette is a 
copy of another. Certify — verifies that 
all used sectors on a diskette can be 
read. Statistics— reports the amount of 
used and unused space on a diskette 
both in number of sectors and as a 
percentage of the total diskette. 
Patch — a program for the advanced user 
who wants to access any byte on a 
diskette. With this program you can 



'undelete' a 


deleted file, protect a bad 


sector from 


access, remove or add Con- 


trol charact 


ors in file names and much 


more. 




Price: 


$19.95 on diskette, with 




manual. 


Author: 


Hal Claik 


Available: 


On-Going Ideas 




RD #1 Box 810 




Starksboro, VT 05487 



Name: Hex-ASCII Memory 

Dump 

System: Apple 11 or Apple 11 Plus 

Memory: Any 
Language: 6502 Machine Code 
Hardware: Apple II or Apple II Plus 
Description; A utility program design- 
ed for use in the software development 
environment. The ASCII conversion 
output makes locating textual data in 
memory extremely easy. Runs stand 
alone or interfaces to either BASIC 
through POKES and CALLs. Output to 
video or printer. In interactive mode it 
supports paging, scrolling or stop-start. 
Four data entry formats and five control 
functions. Small, occupies only 512 
bytes. Completely relocatable with 
monitor move command or BLOAD to 
address. An invaluable aid for the 
serious programmer. 
Copies Just Released 

Price: $15.95 on disk includes 

disk and documentation 
Author: Richard E. Rettke 

Available: RER Software 

1757 Acom Ct. 

Menasha, WI 54952 
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Name: Modem Magic 

System: Apple n/ Apple n Plus 
Memory; 48K (ROM Applesoft) 
Language: Applesoft/Machine 

Language 
Hardware: D.C. Hayes Micro- 
modem, Disk n 
Description: Five programs to 
automatically download and upload 
data and programs to remote computers 
(such as a CBBS or another Apple). 
Special routines to strip out un- 
necessary 'formatting' blanks from 
BASIC programs (to minimize 
transmission time) and to properly 
handshake with slow receiving 
computers. 
Copies 25 

Price: $40.00 

Author: Gary Little 

Available: Gary Little 

#101-2044 West Third 

Avenue 

Vancouver, B.C., Canada 

V6J 1L5 



Name: Reading CompTehension 

System: Apple n Plus 

Memory: 16K 

Language: BASIC 

Hardware: Applesoft in ROM 

Description: Has five short stories or 

poems that you must read. Speed of 

reading is set by your age. Then you 

answer 10 questions about the story or 

poem. Can change data on tape— on 

tape. 

Copies: As Needed 

Price: $10.00 

Author: Jim and Lois Willis 

Available: )im Willis 

1300 Hinton 

West Monroe, LA 71291 



Name: Financial Management 

System 

System: Apple U or Apple n Plus 

Memory: 48K with ROM Applesoft 
Language: Applesoft 
Hardware: Disk E, Printer Optional 
Description: A disk-based home ac- 
counting system with unlimited files. 
User defined macros allow 1-3 
keystroke entrys and automatic tax 
coding. Audit all files by tax code with 
monthly and year-to-date totals. 
Printer listings of disk files, balance, 
reconcile, search, audit, and macro 
lists. 
Price: $29.95 on disk includes 

diskette and complete 

documentation. 
Author: D.R. Jatvis 

Available: D.R. Jarvis Computing 

1039 Cadiz Dr. 

Simi, CA 93065 



Name: The Environment Life 

Dynamic 

System: Apple n 
Memory: 48K 
Language: Applesoft 
Hardware: Apple n, Disk II 
Description: This d:lsk gives you a long, 
intense look at environment, its ef- 
fects, aids to improving it, and ways of 
transcending or transforming it. The 
disk deals with differentiating between 
a good and bad environment, identify- 
ing positive environmental character- 
istics, oppressd aspects of yourself, and 
finding rare individuals who would be 
perfect for being part of a truly 
beautiful lifestyle/space. Lightning 
Bugs, Turn '£rn Loose!, and the incom- 
parably unique Jungle Safazi are 3 of the 
included Hi-Res (shape table) games. 
You'll love them and learn from them. 
Copies Many 

Price: $15.95 includes disk, 

game card. 
Author: Avant-Gatde Creations 

Available: Avant-Gatde Cieations 
P.O. Box 30161 MCC 
Eugene, OR 97403 

Name: 2516/2716 EPROM 

Programmer 

System: SYM;-1 

Memory: 8K 
Language: BASIC 
Hardware: 3rd 6522 VTA 
Description: With, just $5 in spare 
parts, this powerful programmer 
package will 1) program EPROMS, 2) 
verify EPROM is cleared, 3) copy 
EPROM to memory, 4) display EPROM 
data, 5) display SYM memory, 6) enter 
new data into SYM memory, and more. 
Any number of bytes can be program- 
med (read) from (into) any area of 
memory. Instructions included. 
Copies: New Release 

Price: $15 

Author: Jack Gieryic 

Available: Jack Gieryic 

204.1 138th Ave. N.W. 

Andover, MN 55303 



These listings aie free. In older to obtain a 
free listing, however, software producers or 
distributors must follow the fonnat used 
here. The description part of the listing may 
NOT exceed 12 typeset lines. 

Listings are published in the order in which 
they are received. However, only one entry 
per company is accepted for publication in 
any single month. When more than one en- 
try is submitted, the company submitting 
the entry must establish the relative 
priorities. If the software product or its price 
change after an entry is submitted, it is the 
responsibility of the company to notify 
MICRO prior to pubhcation. 



Name: Editing Terminal ROM 

System: OSI CIP, Superboard 

Memory: No RAM Used 
Language: 6502 Machine Code 
Hardware: None Special 
Description: This ROM Monitor pro- 
vides a smart terminal program, BASIC 
program line recall/edit, ASCII file 
transfer between terminal/ROM 
BASIC/disk BASIC, program 
uploading/down loading, easy transfer 
of programs between tape and disk, 
serial output driver, keyboard corrected 
to typing fonnat, screen clear. All 
featvures available at power on. 
Copies Just Released 

Price: $59.95 for ROM and 11 

page manual. 
Author: Leo Weeks 

Available: Micro Interface 

3111 So. Valley View 
Blvd. Suite I-lOl 
Las Vegas, NV 89102 



Name: Video Games 2 

System: OSI CI, C2, C4, C8 

BASIC in ROM 
Memory: 8K 
Language: BASIC 
Hardware: None Special 
Description: Video Games 2 consists of 
three games: Gremlin Hunt, Gunfight 
and Indy 5000. Gremlin Hunt is an 
arcade-style game for one to three 
players. Players try to run over 
'gremlins' with their tanks. Gunfight is 
a duel of mobile artillery for one or 
two. Indy 5000 is a race game for one or 
two. Color and sound for machines so 
equipped. 

Copies Just Released 

Price: $15 on cassette tape, ppd. 

Author: Alike Bassman 

Available: Otion Software 
Associates 
147 Main Street 
Ossining, NY 10562 



Name: FIFO Morse Typewriter 

System: AIM 65, IK or 4K 
Memory: Needs 500 Bytes 
Language: Assembly 
Hardware: Simple keying circuit for 

transmitter included. 
Description: For ham radio buffs. FIFO 
operation, keyboard always active. 
Display automatically switches from 
keyboard to output buffer so that 
operator doesn't lose track. Delete, 
speed adjust features included. 
Copies: Just Released 

Price: $9.95. Object file 

cassette, source available. 
Author: Alan M. Davis 

Available: A. M. Davis 

RFD #2130, Route 106 

Syosset, New York 11791 
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"Computers ' R' us" 

A CONSUMER COMPUTERS SUBSIDIARY 

9 UNBEATABLE MAIL ORDER DISCOUNTS 




'appiG computer 

Authorized Dealer 



- ' --> 



»925 




FOR 



16K 



48K 

FOR ONLY 

♦1049 



lappki/// 

APPLE II OR APPLE II PLUS 



V^ 



APPLE COMPUTER 
PIRIPHIRALS 

DISK II DRIVE il CONTROLLER CARD 

With DOS 3.3. Ult ««4C S29 

DISK II DRIVE ( CONTROLLER card *K 

DISK II DRIVE ONLY 42S 

GRAPHICS TAILET «E6 

SILENTYPE PRINTER w/lnt. card 61B 

SSM AID SERIAUPARALLEL kit 166 

SSM AlO aaaamblad t taatad 190 

5YMTEC LIGHT PEN SYSTEM 216 

SYMTEC SUPER SOUND GENERATOR. .22S 
SVA I INCH DISK CONTROLLER CAR0.33S 
VERSA WRITER DIOITIZER SYSTEM. ...215 
VIDEX VIDEOTERM SO COlUM«l liAJftO.JIS 
VIDEX VIDEOTERM wfgraphic* ROM. . . 33S 

peO DISK DRIVE OMU.... 3W 

BO DRIVE wloomrailar «*><! ...4«S 

; HAYES MICMlMOOeW «... »S 

-b'AN PAYMAR tOwaf caa* kh,.. $S 

APM.C (»>MniTEIt 
INTEIIFAti CAROS^ 

PARALLEL P(»l»ttft ln», tMMti .....-*.,. W 
COMMUNICAt)On<;AM>wte<HUt. «*bt«. 1«S 

HispEED semAi 6k. «*Mt 1« 

LANGUAGE irtmu WtOt PA&CAL «« 

CENTRONICS ^fltKTSK titt e*ti m 

APPLESOFT 11 RItMWAm t»(4 1«t 

INTEGER BAStC fitmftMB «ar(t t4t 

MOUNTMH HMUmARE 

ACecSSOflfiS 

ADtvMonOr 

Mountaht CottifMtaf 

APPLE CLOCK/CALENOAN e«d. . ..4, .. .ZB 
SUPERTALKER SO200 tmtCH 

SYNTHISIZER SYSTEM.. 24S 

ROMPLUS w/kayboard filtw „... . .... .. IK 

INTROUX-10 »SR REMOTE CONTitOL 

SYSTEM 2« 

INTROUX-IO controllar card only 1H 

ROMWRITER SYSTEM 1M 

MUSIC SYSTIMII* volcai/ataraol 4W 

A/DO/A It CHANNELS 31S 

EXPANSION CHASSIS 18 alotal E66 



APPLE ADD-ONt 

CORVUS 10 MEGABYTE HARD DISK 

DRIVE SYSTEMw/pwr aupply 43SS 

CORVUS CONSTELLATION 586 

1SK MEMORY UPGRADE KIT 

(THS-iO. *I»PLI II. •ORCIRER) SO 

AST NUMlKIC INPUT KEYPAD 

lapaoify iaWI or naw kybrdi 115 

Al> MMBIC SYNTHISI2ER 236 

BRIOWTWH LIOHTPIN 32 

G«B rtStt-4S8 11878) Int 2B9 

ARItHMETIC PROCESSOR card 336 

SPEECHLINX 2008 (84 Word Vocab.l 216 

MtR SUP-R-MOD TV MODULATOR 30 

MIGROSOI^ «0 iOrrCAIID SYSTEM 

wjcpfM t nMCROforr basic nt 

MtCKOWOnKi-OM* DIOiSECTOR 339 

tA2ER Ipwar e«aa Ml«»<ar 50 

MBR SUPEN tlMMlNAL 

lOoofumncard 335 

AI>i^LI U or APPLE II PLUS 
•OfTWARE 

fASCAi with lAXaUAGE SYSTEM 42S 

fOATRAN tot um <wtth LANGUAGE 
*«r$T6M 186 

&m m M« with MICROSOFT 

»*» «On-C*«0 8ocU 299 

)M!«M -. M 

TMf CONTAOLLIR QE«<«r*l Buainaaa 

«V*1*m..... 519 

¥HE CASHICit flatall M*|i*««>i»nt 4 

Inventory SyatMi, 199 

APPLfeWRtTCtt Wtrnl ProcMnr as 

APPLEPOBT MAiLtMd Hal ayatam 46 

AfiPtCnoT «n««t t Plot »ytam 80 

now JONU P6IITP01I0 (VALUATOR. .46 
APPU COMTIHBUTIO VOLUMES 

1 thru I vWitMmiala 30 

VISlCAtC by PMBONAL SOFTWARE. ... 120 
DESKTOPfPLAN by DESKTOP 

COMPUTERS 86 

CCA DATA MANAGEMENT SYSTEM 

By PERSONAL SOFTWARE 86 

APPLEBUG ASSEMBLER/DISASSEMBLER. 76 
APPLE DOS TOOL KIT 86 



VIDEO MONITORS 



LEEDEX VIDEO 100 129 

SANY0 9"B&W 165 

SANYO 15- B6W 245 

PANACOLOR lO" COLOR 329 

NEC 12" HI RES COLOR 876 

NEC 12 ■ LORES COLOR 399 

NEC 12' GREEN PH0SPHER(P31I ...... 239 



♦129 

LEEDEX 
VIDEO 100 



^ 




16K FOR #5151 



ATARI 800 

PERSONAL COMPUTER SYSTEM 



ATARI ACCESSORIES 

4013 COMPUTER 473 

820 PRINTER 140 coll 459 

810 DISK DRIVE 569 

410 Program Racorder 59 

81S DUAL DISK DRIVE 1199 

82:! THERMAL PRINTER 140 coll 369 

82S PRINTER ISO col imp I 795 

BSO INTERFACE MODULE 175 

ATARI 16K RAM MODULE 156 

LKjHTPEN 65 

ACOUSTIC MODEM ICATI 169 

COMPUTER CHESS 35 

SPACE INVADERS 19 

STAR RAIDERS 49 

SUPER BREAKOUT 35 

3-D TICTACTOE 35 

VIDEO EASEL 35 

MUSIC COMPOSER 49 

ANAOEX DPSOOO 775 

ANADEX DP.9600 1360 

BASE 2 599 

CENTRON ICS 737 825 

MPI 88 T 699 

PAPER TIGER IDS 440 

w/graphics 896 

NEC SPINWRITER 2560 

TRENDCOM 200 519 

SILENTYPE w/lnt 515 

EPSON TX 80 wigraphics 72» 

EPSON MX 80 132 col 620 




EPSON 

Tx-ao 



IN CALIFORNIA 

OR TECHNICAL 



C°AV,°N"FoTAr°^" TOLL FREE ORDER UNE:1.800-854-6654 




699 



r. 



CAP 

BK ROM BASIC 

8K RAM EXPANDABLE TO 9eK 

32)i64 UPPER 1 LOWER CASE 

25««512 GRAPHICS POINTS 

PROGRAMMABLE TONES 

ANALOG INPUTS 

C4PMF II DISK DRIVE) '599 

_l>>/\, 




'429 



CIP MOD II 

ax ROM BASIC 
SK RAM EXPANDABLE TO 32K 

COLOR EXPANSION 
48 LINE DISPLAY EXPANSION 



SOFTWARE 



Caaaatta 


Diak 


SPACE INVADERS 19 


29 


SARGONII 30 


36 
89 


FORTH NIA 


OS86-DV3.3 N/A 


79 


MDMS PLANNER N)A 


1M 


GRAPHICS! N/A 


36 


OACI N/A 


46 


ASSEMBLER/EDITOR... 40 


N/A 


EXTENDED MONITOR . . 20 


N/A 


PASCAL Ir FORTRAN 




|4P&8Ponlyl 


460 






apacify ayatam. 





PLOTTERS 




1095 



only 

WATANABE MIPLOT 

I for more info please call or write 






(714) 698^088 



CREDIT CARD USERS PLEASE READ TERMS OF SALE IN ORDERING INFORMATION 



•FAST DELIVERY 
•LOW PRICES 
•COURTEOUS SERVICE 
•KNOWLEDGEABLE STAFF 
•LARGE VARIETY 



ORDERING INFORMATION: Phona Ordara Invilad using VISA. MASTERCARD. AMERICAN EXPRESS, or bank wira Iransfars. VISA 6 MC cradit card sarvica charga ot 2%. AE cradll 
card larvica charga of 6%. Mall ordari may sand charga card numbar (Includa aiplrallon data), ciithlar's chack, monay ordar or parsonal chack (allow 10 buslnass days to claar.) 
Plassa Includa a taiaphona numbar wllh all ordars. Foraign ordars (axcluding Military PC's) add Ul% lor shipping and all lunds must ba In US dollars. Shipping, handling and In- 
suranca in U.S. add 3%. Calllornla raaldants add 6% salas lax. Our low margins prohlbll us to i.and COD or on account. All aqulpmant subjact lo prica changa and availability 
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Dr. William R. Dial 
438 Roslyn Avenue 
Akron, Ohio 44320 



797. Call - Apple 3, No. 5 (June, 1980) 

Wagner, Roger, "Text Output on the Apple U," 

pg. 7-17. 
A major article on how text is output to the Apple 
screen including an example machine language pro- 
gram which will scroll either page 1 or page 2 of the text 
both up and down. 

Reynolds, William, HI, "Applesoft Program Splitter," 

pg. 19-22. 
Moves program lines inside a program in order to 
protect Apple HGR page(s) or for insertion of OP codes 
inside a program. 

Gelding, Val, "Into Integer," pg. 31-32. 
A discussion of the merits of Integer Basic for the Apple 
together with a program for Integer Basic String Anay. 

Curtiss, Dick, "CP/M for Apple H," pg. 33. 
How to install the Control Program/Monitor (CP/M) 
on an Apple. Requires the new Z80 plug-in card. This is 
said to open the door for a whole new library of 
sophisticated programs available to the CP/M users. 

Huelsdonk, Bob, "Making Basic Behave: Part HI," 

pg. 35-37. 
A continuation of the development of an Apple utility: 
this installment continues with the base program, ad- 
ding input, edit, and disk file routines. 

Reynolds, Lee, "EXEC Files on the Apple 11/', pg. 39-40. 
Take advantage of the very useful EXEC function on the 
Apple. 

Hertzfeld, Andy, "Init and Switch," pg. 43. 
A Hex dump routine in machine language for the 
Apple n. 

Gelding, Val, "Write Apple," pg. 44. 
A neat trick to save space by BSAVEing Applesoft in- 
tegers or reals to disk. Also a routine for disabling the 
stop list at full page for the Apple disk Catalog 
command. 

Hewitt, Jay, "Disk I/O in Pascal," pg. 48. 
Two programs, one in Basic and one in Pascal, to show 
how this routine translates from one system to the 
other. 

Golding, Val J., "Applesoft Text Screen Dump," pg. 51. 
A short routine for the Apple. 

798. Interface Age 5, No. 6 (June, 1980/ 

Leary, Richard A., "Mixed Interfaces,", pg. 108-112. 
Interfacing the 6502 to a Z-80. 

Wetzel, Ken, ' 'A Break Service Routine for a KIM-1 with a 

Teletype," pg. 132-135. 
Routine allows listing of all the internal registers of the 
6502 CPU whenever it encounters a breakpoint. 



799. Dr. Dobb's Journal 5, Issue 6, No, 46 (June/July, 1980) 

Bach, Stephen E., "ROM Byte-Finder for the Apple II," 
pg. 26. 

Routine prints all 256 values and addresses in the ROM 

in the Apple. 

Bach, Stephen E.; "Improvements to Apple User Inter- 
face," pg. 56. 
Improvements for the Renumbering program in DDJ 42. 

800. Byte 5, No. 6 (June, 1980) 

Renbarger, John, "A Telephone-Dialing 

Microcomputer," pg. 140-170. 
A simple hardware addition and software for the KIM-1 
to provide telephone dialing on Touch-Tone systems. 

801. Kilobaud Microcomputing, No. 42 (June, 1980) 

Hadeishi, Mits, "Additional Indexing Features," 
pg. 20. 

Routine for the PET. 
Prentice, Al, "A File Sorting Program and its Diary," 
pg. 34-40. 

Describes the development of a File-Sorting program for 

the Apple. 
Monsour, Fred, "Cook's Memory Test for the 6502," 
pg. 178-179. 

This program tests 8k of RAM in less than 3 seconds. 

802. Peek(65) 1, No. 6 (June, 1980) 

Canoll, Michael B., "Auto-Loading Machine Language 
Casssette Tapes," pg. 7-8. 

Here are two methods for OSI systems. 
Morton, Ian A., "Large RAM and Long Programs," pg. 14. 

Some hints concerning inputting from cassette and 

keyboard on OSI micros. 

803. Softside: Apple Edition (June, 1980) 

Truckenbrod, Joan, "Apple Graphics," pg. 12-14. 

A tutorial on Hi-Res graphics explaining how figures are 

moved in various directions. 
Pelczarski, Mark, "Program for Your Disk System," 
pg. 33-34. 

A special "hello" program for the Apple disk. 
Pelczarski, Mark, ' 'High Resolution Drawings from The 
Magic Paint Brush," pg. 44-48. 

Program is an adaptation of an earlier program to 

operate in high resolution graphics on the Apple. 
Blackwood, Brian and George, "Intimate Instructions in 
Integer BASIC," pg. 49-54. 

Lessons HI, IV and V of the continuing tutorial for the 

Apple. 
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804. Creative Computing 6, No. 6 (June, 1980) 

Ault, Robin, "More Error Trapping Input," pg. 10. 

Discussion pertinent to Apple and Applesoft programs. 
Tubb, Philip, "Apple Music Synthesizer," pg. 74-83. 

With a computer controlled synthesizer it is claimed 

that almost any instrument or sound can be duplicated. 
Anon,, "Sound Apple Hint," pg. 89. 

How to hear your Apple a little more clearly by adding 

an outboard speaker. 
Heuer, Randy, ' 'Apple Hi-Res Graphics Made Easy with 
the VersaWriter," pg. 92-93. 

A review of a drawing board for the Apple. 
Rogowski, Steve, "Graphics Goodies: The Case for 
Polar," pg. 98-103. 

Graphics tutorial including a listing in Pascal for the 

Apple Turtlegraphics. 
Simoni, Richard T., Jr., "The Intricate Graphs of the 
Polar Functions," pg. 104-107. 

A computer program for the Apple to graph polar 

functions. 

Vile, Richard C., Jr., "Apple Kaleidoscopes," 
pg. 110-113. 
Methods of developing kaleidoscope routines. 

805. OSI Users Independent Newsletter, No. 4 (June, 1980] 

Curley, Chjirles, "Notes of the OS 65U," pg. 1-2. 
POKEs of use to OS 65U video system users, other 
addresses of importance, etc. 

Hooper, Phil, "String Finder Routine with Wild Card," 
pg. 4-5. 

A string finder extension to the extended OSI monitor 

which allows for don't care bytes. 

Curley, Charles, "BASIC," pg. 5. 

Several "little known" facts about 65U BASIC. 
Curley, Charles, "Disassembly," pg. 5-6. 

A quick and dirty mini assembler for the OSI system. 

806. Stems from Apple 3, No. 6 (June, 1980) 

Stein, Dick, "Integer Renumber, " pg. 4. 

To renumber Integer programs change them to 

Applesoft, renumber with existing routines and then 

change back to Integer. 
Robin, Neil .A., "ROM/PROM Testing Program," pg. 9. 

A nearly foolproof method for calculating ROM/PROM 

checksums. 

Hoggatt, Ken, "Random Number Analysis," pg. 10. 

A routine for the Apple to test your random number 

generator at several numbers and compare results. 
Erickson, Bret and Hoggatt, Ken, "Pascal Math 
Program," pg. 11-13. 

A listing in Pascal for the Apple is given. 
Stein, Dick, "File Cabinet Changes," pg. 13. 

More changes for this oft-upgraded program. 
Good, Bob and Reed, Ron, "Recdemo/' pg. 14-15. 

Takes data Input from keyboard, writes 3 records to 

disk, reads 3 records from disk and displays data; in 

Apple Pascal. 

807. G.R.A.P.E. (July, 1980) 

Trusty, Doug and Lawson, Steve, "GRAPE Hi-Res 

Writing," pg. 4. 
Several routines for the Apple including Trusty 
Scroller, Hi-Res Writer, and English, Greek, Hebrew 
Type Fonts. 



808. Rubber Apple Users Newsletter 3, No. 6 (July, 1980) 

Anon., "Taking the GRRR Out of Graphics," pg. 3, 
A tutorial on Hi-Res graphics, creating pictures, saving 
them and recovering pictures. 

Anon., "Tabbing with Apple Peripherals," pg. 5. 
With printer driver routines for parallel, serial and other 
printer systems. 

809. MICRO No. 25 (June, 1980) 

Peterson, Craig, "A Little Plus for Your Apple II," 

pg. 7-9. 
A routine for the Apple II to provide the features of the 
Apple II Plus. 

Carlson, Edward H., "Put Your Hooks Into OSI BASIC," 

pg. 15-17. 
Extend your OSI BASIC in ROM? Very easy. This arti- 
cle tells how. 

Nelis, Jody, "Share Your AIM Programs," pg. 23-33. 
A routine for combining the AIM disassembler output 
with comments. 

Partyka, Dave, ' 'Apple n Integer BASIC Program List by 

Page," pg. 37-39. 
This program simplifies the viewing of an Apple listing 
by printing it page by page. 

Dombrowski, George J., Jr., "BASIC and Machine 

Language with the Micromodem 11," pg. 47-48. 
A program to send programs over phone wires using the 
Apple n and the D.C. Hayes Micromodem II. 

Strasma, Rev. James, "PET-16," pg. 49-51. 
For those PET owners who have envied the Sweet- 16 
software of the Apple, here is PET-16. 

Kemp, David P., "Slide Show for the SYM," pg. 53-56. 
An Apple to SYM Picture Translator. Permits a SYM 
with visible memory to use the Apple cassette tapes to 
put on a slide show. 

Kovacs, R., "TRACER; A Debugging Tool for the Apple 

n," pg. 59-61. 
Use this program to make your Apple STEP/TRACE 
routines more useful. 

Dial, Dr. Wm. R., "6502 Resource Update," pg. 65-66. 
A list of magazines which contain information about 
the 6502 microprocessor field on a reasonably regular 
basis. Includes addresses, subscription fees, etc. 

Staff, "MICRO Club Circuit," pg. 68-69. 

Another installment of 6502-related clubs. 
Rowe, Mike (MICRO Staff), "The MICRO Software 
Catalog: XXI," pg. 71-73. 

Fourteen new programs for 6502 systems are reviewed. 
Dial, Dr. Wm. R., "6502 Bibliography; Part XXI," 
pg. 75-77. 

One hundred new references to 6502-related articles. 

810 The Apple Banel 3, No. 5 (June/July, 1980) 

Kramer, Mike, "File Cabinet Stuffer," pg. 7-9. 

A program for the Apple to allow examination, entering 

or changing values in the File Cabinet program. 
Meador, Lee, "Disk Operating System— Part 3, DOS 3.2 
Disassembly," pg. 10-14. 

The third installment of a comprehensive series on the 

Apple DOS. 

811. FortWorth Area Apple User Group Newsletter 1, No. 9 
(July, 1980) 

Stringham, David, "File Cabinet: Sorting Two Files," 
pg. 1-4. 
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Running File Cabinet on two Apple Disk Drives and 

using two files. 
Anon., "Macro POP," pg. 7-8. 

This assembly language program pops a 16-bit address 

for Apple. 
Meador, Lee, "Disassembly of DOS 3.2: Part VI," 
pg. 10-14. 

The sixth installment of this major series on Apple 

DOS. 

812. The Seed 2, No. 7 (July, 1980) 

Kelley, Jim, "Quick Printer n Routine,", pg. 6. 
A short Machine Language routine for the Apple. 

Webber, Stan, "Getting Fancy with Formats," pg. 11-12. 
A number of different types of formatting and examples 
of their implementation. 

Grossman, Craig, "Apple Tricks," pg. 15. 
How to fix an Apple program that will not list and self- 
destructs when it has finished running. 

Suitor, Dick, "The False Read of the 6502," pg. 17-18. 
A discussion of timing signals and reading data. 

Steinmetz, Lori, "DOS Patch to Double the Speed of 

Most Disk Operations," pg. 18. 
Short machine language patch to increase disk opera- 
tion speed and other notes on disk operation. 

Anon., "Apple Hi-Res Routines," pg. 19. 
A list of entry points to program machine level Hi-Res 
graphics. 



813. Compute, Issue 4 (May /June, 1980) 

Lock, Robert and Dejong, Marvin L., "Keeping Up the 

Payments," pg. 19.. 
Three Loan programs that should run on the AIM, 
Apple, Atari or PET. 

Kushnier, Ron, "Computers— Boring, Boring, Boring," 

pg. 27. 
Use of the PET to print out temperatures usmg an 
analog/ digital converter and a temperature sensor. 

Isaacs, Larry, "Inside Atari BASIC," pg. 31-34. 
Information on how Atari BASIC stores programs in 
memory. 

Deal, Elizabeth, "Big Files on a Small Computer," 

pg. 42-46. 
Program demonstrating a way of reducing storage re- 
quirements by a factor of eight — for the PET. 

Davis, Harvey, "Algebraic Input for the PET," pg. 58. 
Description and listing of a useful routine for the PET. 

Straley, Ron, "PET Data Copier," pg. 59. 
Here is a routine that will copy any PET data file or data 
tape so you will have a backup data copy. 

Butterfield, Jim, "Cross-Reference for the PET," pg. 63. 
Notes on the 2040 disk system, reading a BASIC Pro- 
gram as a file, and detailed syntax analysis, etc. 

Greenberg, Gary, "PET GET with Flashing Cursor," 

pg. 77-78. 
Program listing which permits the user to use the GET 
statement instead of the INPUT statement on the PET. 

Herman, Harvey B., "PETting with a Joystick," 

pg. 89-90. 
Install a joystick on your PET to save the keyboard from 
wear in games, etc. 

Johnson, Chuck, "PET and the Dual Joysticks," pg. 90. 
How to install two joysticks on your PET. 



Thomburg, David D., "Made in the Shade: An Introduc- 
tion to 'Three Dimensional' Graphics on the Atari Com- 
puters," pg. 97-98. 

A tutorial on Atari Graphics. Setting and adjusting 

shades of color. 

Lindsay, Len, " 'Enter' with Atari," pg. 103. 
How to insert or append program segments on the Atari 
Computer. 
Conrad, Tom, "Block Access Method Map for a Com- 
modore 2040 Disk Drive," pg. 104-106. 
This map program will allow you to see where your 
files are allocated. Save and Delete files and observe the 
allocation technique. 
McCarthy, C.A., "CHEEP PRINT: Hard Copy for Soft 
Cost," pg. 111-114. 
CHEEP PRINT is a PET program, mostly in BASIC, and 
serves both to list the host program while it is under 
development, and as data output software after the pro- 
gram has been completed. 

814. Southeastern Software Issue No. 19 (July, 1980) 

McClelland, George, "Binary Search of Names File," 

pg. 5-9. 
Here is a program to do a binary search of the NAMES 
FILE program given in previous SES Newsletters. 

815. L.A.U.G.H.S. 2, No, 2 (July, 1980) 

Coimelly, Pat, "Animation," pg. 3-4. 
General tutorial discussing Apple Hi-Res graphics. 

816. Compute H, Issue 2 (June/July, 1980) 

Dejong, Marvin L., "Some A/D and D/A Conversion 

Techniques," pg. 5-12. 
6502 techniques applicable to AIM, KIM, SYM 
systems. Suggested hardware, A/D, D/A driver pro- 
gram for 6522-based timing and driver program for 
KIM-1 interface. 

Butterfield, Jim, "Some Routines from Microsoft 

BASIC," pg. 13. 
Addresses identifying the start of the area in which a 
large number of routines on the KIM, SYM, AIM and 
OSI Micros. 

Zumchak, Gene, "Nuts and Volts," pg. 17-19. 
A good discussion of 6502 read/ write timing. Interfac- 
ing to an existing system or a do-it-yourself prototype is 
not difficult as long as you understand and consider 
timing. 

Beach, Edward B., ' 'Fast Random Numbers for the 6502, ' ' 

pg. 24. 
A short (two instructions) -Fast (ten microseconds) 
routine which produces an 8-bit random number (not 
pseudorandom). 

Day, Michael E., "Part 2: RS232 Commimications," 

pg. 27-29. 
A list of the definitions of the RS232-C signals in the 
order of pin nimibers. With detailed descriptions. 

Butterfield, Jim, "BASIC Memory Map (Page 0]", pg. 33. 
List showing assignments on zero page for KIM, SYM, 
AIM and OSI C2-4P. 

Olsen, Rodger, "Creating Data Files on Tape with OSI 

Computers," pg. 41-45. 
A 'how to' article on files on tape. With listings in 
BASIC for several routines realated to the subject. 

Zumchak, Gene, "SYM High Speed Tape," pg. 55-56. 
How to improve the SYM tape read. 
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Nazarian, Bruce, "KIM Rapid Memory Load/Dump 

Routine," pg. 57-60. 
A routine which works well for mass entering of long 
programs from a hex dump, where you can tell at a 
glance where any errors in your program are. 

Herman, Harvey B., "KIM-1 Tidbits," pg. 60. 
Several programs to facilitate the use of the KIM. 

817. The Abacus n, 2, Issue 7 (July, 1980) 

Anon., "Color Generation in Hi-Res: Part 2," 
pg. 3-5. 
Part two on Apple Hi-Res graphics. 

Robbins, Greg, "Extended Menu," pg. 5-7. 
This menu program for the Apple Disk scrolls com- 
mands across the bottom of the screen and provides 
copy service as well as the full range of disk commands. 

Anon, "lAC APNOTE— Out of Memory Enors," pg. 9. 
Notes on the Applesoft error message. 

Davis, Jim and Freeman, Larry, "Relocatable Control 

Character Detector," pg. 14-15. 
Program to detect control characters on the Apple ex- 
cept for CTRL-H, CTRL-M, CTRL-U or ESCape 
characters. 

Anon., "lAC APNOTE: Applesoft Array Eraser," pg. 18. 
A short program to demonstrate how to erase Appleso 
Arrays. 

818. Kilobaud Microcomputing, No. 43 (July, 1980J 

Baker, Robert W. "PET Pourri," pg. 7-9. 
Describes several new products for the PET; Program- 
ming Ideas and Tips,- and discussion of programming 
style. 

Prentice, Al, "A File Sorting Program and Its Diary," 

pg. 44-52. 
Second and concluding part completes the sorting 
routine and further explores the Apple DOS. 

Derfler, Frank J., "Dial-Up Directory," pg. 68-70. 
Software programs for Modem-type communications. 

Pytlik, WUliam F., "PET Pen," pjg. 84-86. 
Part 2 of 3 installments gives listing and construction 
details for a light pen for the PET. 

Mazur, Jeffrey G. "Add Handshaking to Apple's High 

Speed Interface," pg. 136-138. 
This modification allows the High Speed Interface 
board to handshake properly with printers. Does not re- 
quire a software patch. 



819. Nibble No. 4 (July, 1980) 

Harvey, Mike, "Forecasting and Planning with FAST," 

pg- 7. 

Listing and documentation for FAST, a simulation and 

modeling tool for testing different strategies in the 

direct sales of multiple products and services, for the 

Apple. 
Laird, Alexander, "Super Weaver!", pg. 63. 

Super Weaver is a simulated 8-hamess loom in Apple 

Hi-Res Graphics. 
Staff, "Table Printing Made Simple," pg. 19. 

A formatting routine for the Apple. 
Staff, "Dynamic Array Dimensioning," pg. 19-20. 

Automatically adjust program memory allocation to 

the specific mix of table specifications. 



Connolly, Rick, "Designing a Simple 'Pointer' 

Subroutine," pg. 31. 
A tutorial covering the development of a pointer 
routine which will return a key number to the main 
program of the Apple. 

Harvey, Mike, "Build the Two-Tape Control Unit," 
pg. 35-37. 

Hardware and Software article to increase flexibility of 

your tape storage. 
Mottola, R.M., "Hi-Res Packing for the Apple n,' pg. 41. 

How to keep your Applesoft program out of the way of 

the Hi-Res graphics screen on the Apple. 
Harvey, Mike, "TRAC Screen Only Update," pg. 53. 

Modification of the TRAC printer versions to run with 

Screen output only. 



820. Peisonal Computing 4, No. 7 (July, 1980) 

Walker, Alan, "Cassette Tape Labels," pg. 33. 

A program for the Commodore PET to print labels for 

cassette tapes. 
Brown, DeWitt, "Amortization Tables," pg. 73-75. 

Program to print customized amortization tables on the 

Apple. 



821. Appleseed Newsletter 2, No. 2 (July, 1980} 

Hyde, Bill, "Subroutine to Print the Lo-Res Screen," 

Pg-2- 

Listing to print out Lo-Res apple graphics screens on a 

character printer using a different character for each 

color. 
Wright, Don, "Applesoft Program List Formatter," pg. 5. 

A new and useful formatter program. 



822. MICRO No. 26 (July, 1080) 

Vrtis, Nicholas, "SYM-1 Memory Search and Display," 
pg. 7-11. 

Add two new commands to your S YM monitor to locate 

any string in memory and provide a means to display 

data as ASCII when desired. 
Sherburne, John, "Hellow, World," pg. 31-35. 

An analog interface for the PET. 
Little, Gary B., "Zoom and Squeeze," pg. 37-38. 

A short program for the Apple II which makes it easier 

to edit BASIC programs. 
Swank, Joel, "Viza-KIM," pg. 47-50. 

A KIM Monitor program to display system parameters 

at each step. Uses the 6502 interrupt handling routine. 
Koski, Peter, "Challenger II Communications," 
pg. 53-58. 

Turn your OSI with a 502 CPU board into a 'standard' 

communications terminal. 
Flynn, Christopher J., "AIM 65 File Operations," 
pg. 61-66. 

Programs to solve the problem of missing file access 

statements in AIM BASIC. 

Rowe, Mike (Staff), "The MICRO Software Catalog: 
XXn," pg. 71-73. 

Thirteen new programs are reviewed. 
Dial, Wm. R., "6502 Bibliography: Part XXn," pg. 75-77. 

About 95 new references on the 6502. 
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823. The River City Apple Corps Newsletter (July, 1980) 

Sethre, Tom, "Roots/' pg. 5-6. 
Looping in Apple machine language focussing on the 
specific task of duplicating the BASIC function of 
PRINTing a string. 

Huffman, David G., "Shape Definition Conversion 
Table," pg. 8-9. 
A Hi-Res tutorial for Apple graphics. 

824. Creative Computing 6, No. 7 (July, 1980) 

Carpenter, Chuck, "Apple-Cart," pg. 150-152. 
How to get better sound out of your Apple, notes on 
booting disks, software over the phone, new assemblers 
and simulators. 

Blank, George, "Outpost: Atari," pg. 154-155. 
Notes on information resources for the Atari microcom- 
puter; refers to Compute, Softside; Atari, and a new 
magazine, IRIDIS. 

825. SoftSide: Apple Edition (July, 1980) 

Anon, "User-Proofing Apple Programs," pg. 7-9. 

Check your programs for common problems met by 

Apple users. 
Smith, Bill, "ROM the Robot," pg. 12-19. 

Part Two in a graphics program in Apple Lo-Res. 
Nevin, Scott, "Lo-Res Printout," pg. 34-36. 

Print out your Apple Lo-Res screen on yovir printer. 
Truckenbrod, Joan, "Apple Graphics," pg. 85-88. 

The second in a series of articles on Hi-Res graphics for 

the Apple. Notes on generation of moving figures. 

826. L.A.U.G.H.S. 2, No. 3 (July, 1980 Supplement) 

Connelly, Pat, "Shaper," pg. 3-7. 
How to lift a shape or object off the Apple Hi-Res screen 
and place it in your shape tables. 

827. Stems From Apple 3, Issue 7 (July, 1980) 

Anon., "Day of Month," pg. 8-10. 
A Pascal program for the Apple II. 

International Apple Corps "APNOTES," pg. 15-19. 
Several APNOTES including Notes on Random Number 
Generation, Print Using Simulator, HIRES SCREEN 
Function, Pascal Hi-Res Load/Save to Disk, etc. 

828. Peek(65) 1, No. 7 (July, 1980) 

Sanders, Jim, "A Visit to Monte Carlo," pg. 2. 

A tutorial on random numbers with 2 examples for the 

OSI system. 
Hawkins, Gary, "Conditional Control C." 

Interrupt your listing with a graceful exit and nothing 

happening to your files. 
Kourany, Paul, "Higher Resolution Graphics and 
Machine Language Save," pg. 7-9. 

A routine for improving the resolution of OSI graphics 

and a machine language save routine. 
Lew, Kevin G., "Morse Code Practice," pg. 10-12. 

A code practice program for the OSI C2/4P using the 

audio out capabilities of the micro. 
Atchley, Fred W., "The USR(XJ Routine," pg. 19. 

An example machine language program and BASIC 

listing to implement it. 



829. Byte 5, No. 7 (July, 1980) 

Hallgren, Richard C, "Interactive Control of a 
Videocassette Recorder with a Personal Computer," 
pg. 116-134. 
Use of a computer to control videotaped material. 

830. Peelings n 1, No. 2 (July /August, 1980) 

Staff, "Apple Software Reviews," pg. 4-30. 
22 new programs are reviewed in considerable detail. 

831. Sym-Physis, Issue 4 (July/ August, 1980) 

Gieryic, Jack, "Notes on SYM-1 Programs," pg. 3-11. 
Notes on several programs including Bill Gowan's 
Hi-Density Plot Routine, and a listing of a graphics 
program. 

Gieryic, Jack, "Cursor Positioning/ Graphics Primer," 
pg. 4-7. 

A primer tutorial with two KlM-2 examples. 
Gieryic, Jack, "Complex Sound Generator Chip," 
pg. 7-8. 

The SN76477N, a $3 chip from Radio Shack, can be 

used for generating a lot of interesting sounds. 
Winter, Frank, ' 'TOPS - a Tape Operating System for the 
SYM," pg. 12-14. 

All about TOPS, with a BASIC source to demonstrate a 

typical program to create a data file. 
Hobart, Joe, "An EPROM Burner for the SYM-1," 
pg. 15-18. 

Description of interface, hardware and software for TI 

2516 and 2716, 2532, 2732 EPROMS. 

832. Sym-Physis, Issue 4 (July /August, 1980] 

Gschwind, Hans W., "Handling Data Files and Multi- 
Paramenter USR Functions," pg. 19-24. 

Discussion of handling BASIC data files with listing 

and example of output. 

833. Queue Catalogue, No. 2 

Staff, "Educational Software for Apple II, PET and 
TRS-80," pg. 1-55. 
A very complete listing of software (55 pages). 

834. Compute 1, Issue 5 (July/ August, 1980) 

Staff, "Panasonic Microcomputer," pg. 5. 

The new Panasonic is 6502-based with IK, expansion 

module for 12K, very small and compact and about 

$400. 
Budge, Joseph H., "Visicalc," pg. 19. 

A major software review. 

Lock, Robert, "Basically Useful BASIC," pg. 21. 

Another article in this continuing series with examples 

of financial programs. 
Deal, Elizabeth, "How to Program in BASIC with the 
Subroutine Power of FORTRAN," pg. 23-26. 

A listing for the PET is given. 
Baker, Al, "Programming Hints for Atari/ Apple, " 
pg. 34-36. 

Joystick and Menu selection routines. 
Schmoyer, Jeff, "Apple II ROM Card Documentation," 
pg. 49. 

Circuit Diagram for the ROM Card and discussion 

thereof. 
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Missing 
A 

iMCRO 

9 



If you are missing a 
specific baci( issue of 
MiCRO, ask your dealer 
for that particular issue. 
He can assist you in 
completing your collec- 
tion. 



For a complete reader's 
guide to all technical 
articles, visit your local 
mCRO dealer. (This 
index is listed by 
microcomputer, issue ,:: 
number, and "Best of" 
Volume.) Be sure to 
refer to the partial index 
in this issue. 



If your dealer does not 
currently stock MICRO back 
issues, ask him "Why Not?" 
Back issues may be ordered 
directly from MICROl'^hen 
necessary. 
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HOW TO TURN AH APPLE IWTO A lANK. 



With Computer Conflict'*and a little imagination, we'll 
transform your staid and respectable Apple computer into the 
fearsome war machine of the Soviet Red Army. Computer 
Conflict actually consists of two fast-paced, action-packed war 
games played on full-color mapboards of Hi-Res graphics: 
Rebel Force and Red Attack! 

REBEL FORCE puts you in the role of a Soviet commander 
whose regiment must face a computerdirected guerrilla up- 
rising which has ovenun a vital towa Amied with your tank, 
heavy-weapons, and infantiy units, your mission is to regain 
the town through the annihilation of tfie Rebel Force 

Your advance will be brutally opposed by minefields, 
ambushes, militia, and anti-tank guns — all skillfully deployed 
by your computer. Survival and success of your units will 
depend on your ability to take advantage of the variable tenains 
- open, forest, and rough - each of whkrh has different move- 
ment costs and shelter values. 

In this finely-balanced solitaire wargame, eveiy move is 
played under real-time conditions: Procrastinate and lose At 



the same time, caution cannot be cast aside; severe unit 
losses will only result in a Pyhrric victory at best 

With its five levels of difFicuhy (plus one where you make 
up your own), the computer can and will stress your tactical 
skills to their fullest 

RED ATTACK! simulates an invasion by a mixed Soviet 
tank and infantiy force against a defending battalioa As the 
defervJer, your task is to deploy your infantry units effectively 
to protect three crucial towns — towns that must not fall! 

As the Russian aggressor, your objective is to crush the 
resistance by taking two of these three towns with your tanks 
and infantry. With control of these strongpoints, the enemy's 
capitulation is assured 

Red Attack! is a two-player computer simulation of modem 
warfare that adds a nice touch: At the start of each game, the 
computer displays a random setup of terrains and units, pro- 
vkling eveiy game with a new, challenging twist 

Computer Conflict for $39.95, comes with the game pro- 
gram mini-disc and a mie book. 




OR A SPITFIRE. 



After you're done playing Computer Conflict you may be 
in a mood for something other ttian ground-attack wargames. 
In that case. Computer Air Combat is just what you need 

With Computer Air Coml>at your screen lights up with an 
open sky generated by Hi-Res graphics offering global and 
tactical plots. Squint your eyes a bit, let loose your mind and 
you'd swear your kevt)oard has melted into the throttle, rudder, 
altimeter, and other cockpit instrumentation of a World War II 
combat plane In fact any of 36 famous fighters or bomber^, 
from a Spitfire and B-17 fTying Fortress to the Focke-Wulf 190 
and ASMS Zero. Each plane is rated - in strict historical 
accuracy and detail - for firepower, speed maneuverability, 
damage-tolerance, and climbing and diving ability. 

Practically every factor involved in flying these magnificent 
airplanes has been faken into account even down (or u|^) to 
the blinding sua Climb, dive, twist and tura Anything a real 
plane can do, you can do. However, the computer prevents all 
'illegar' moves - such as making an outside loop (w^ich in 
real life, would disastrously stall a plane). 



PLMf THE COMPUTER Aside from being the game's 
perfect administrator and referee, the computer will serve as a 
fierce opponent in the solitaire scenarios provided: Dogfight 
Bomber Formation, rada^controlled Nightfighter, and Vl lnte^ 
cept There's even an Introductory Familiarization Flight (with 
Air Race optton) to help you get off the ground 

With the number and type of planes and pilot ability 
variable, you can make the computer as challenging as you 
want to give you the ultimate flying experience. 

PLAY A HQMAN. Two can play this game as well in 
dogfights and bomber attacks. Given a handicap of more or 
better pdanes or an ace pilot (or all of the above), even a 
novice at Computer Air Combat stands a chance to defeat a 
battle-hardened veteraa 

For $59.95, Computer Air Combat gives you the game 
disc, a nile booK two mapboard charts (for plotting strategies 
between moves), and three playeraid charts. 



Credit card holders, if you own an Apple*n 48K (Apple- 
soft ROM) and a mini-floppy disc drive, call 800-227-1617 
ext 335 (toll free) and charge your order to your VISA or 
MASTERCHARQE In California, call 800-772-3545, ext 335. 

To order by mail, send your check to: 
Strategic Simulations Inc, Dept PC, 465 Fairchild Drive, 
No. 108, Mountain View, CA 94043. All our games cany a 
14-day money back guarantee to assure your satisfaction. 

While you're at it you can also get our other games: 



D Computer Bismarck for your Apple: $59.95 
Computer Bismarck, TR&80® 48K Disc: $59.95 
Computer Bismarck, TRS-80 32K Cassette: $49.95 

D Computer Ambush (a tactical simulation of man-to- 
man combat in WWII) for your apple: $59.95 

D Computer Napoleonics, the Battle of Waterloo for your 
Apple $59.95 

a Computer Quarterback (a ^ea^tlme strategy football 
game): $39.95 



Apple is a registered trademark of Apple Computer Inc 
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IF YOU'RE WAITING FOR THE 

PRICE OF WORD PROCESSORS 

TO FALL WITHIN REASON. 



o 





Everyone expected it would happen 
sooner or later. . .with WordPro PLUS'" 
It already has! Now all the marvelous 
benefits of expensive and advanced 
word processing systems are available 
on Commodore computers, America's 
largest selling computer line. WordPro 
PLUS, when combined with the new 80 
column CBM 8032, creates a word pro- 
cessing system comparable to virtually 
any other top quality word processor 
available— but at savings of thousands 
of dollars! 



New, low cost computer technology is 
now available at a fraction of what you 
would expect to pay. This technology 
allowed Commodore to Introduce the 
new and revolutionary CBM 8032 
Computer. 

WordPro PLUS turns this new CBM 
8032 Computer into a sophisticated, 
time saving word processing tool. With 
WordPro PLUS, documents are dis- 
played on the computer's screen. Edit- 
ing and last minute revisions are simple 
and easy. No more lengthy re-typing 
sessions. Letters and documents are 
easily re-called from memory storage 
for editing or printing with final drafts 
printed perfectly at over five hundred 
words per minute! 



Our nationwide team of professional 
dealers will show you how your office 
will benefit by using WordPro PLUS. At 
a price far less than you realize. 



Invest in your office's future. . . 
invest In WordPro PLUS... 
Call us today for the name of the 
WordPro PLUS dealer nearest you. 

Professional Software Inc. 

166 Crescent Road 
Needham, MA 02194 
(617)444-5224 
TELEX: 95 1579 



The home computer you thought was 
years away is here. — 
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IP DF 



Ohio Scientific's top of the line personal com- 
puter, the C8P DF. This system incorporates 
the most advanced technology now available 
in standard configurations and add-on options. 
The C8P DF has full capabilities as a personal 
computer, a small business computer, a home 
monitoring security system and an advanced 
process controller 

Personal Computer Features 

The C8P DF features ultra-fast program execu- 
tion. The standard model is twice as fast as 
other personal computers such as the Apple II 
and PET. The computer system is available 
with a GT option which nearly doubles the 
speed again, making it comparable to high end 
mini-computer systems. High speed execution 
makes elaborate video animation possible as 
well as other I/O functions which until now, 
have not been possible. The C8P DF features 
Ohio Scientific's 32 x 64 character display with 
graphics and gaming elements for an effective 
resolution of 256 x 512 points and up to 16 
colors. Other features for personal use include 
a programmable tone generator from 200 to 
20KHz and an 8 bit companding digital to 
analog converter for music and voice output, 
2-8 axis joystick interfaces, and 2-10 key pad 
interfaces. Hundreds of personal applications, 
games and educational software packages are 
currently available for use with the C8P DF. 
Business Applications 
The C8P DF utilizes full size 8" floppy disks 
and is compatible with Ohio Scientific's ad- 
vanced small business operating system, 



OS-65U and two types of information manage- 
ment systems, OS-MDMS and OS-DMS. 
The computer system comes standard with a 
high-speed printer interface and a modem in- 
terface. It features a full 53-key ASCII 
keyboard as well as 2048 character display 
with upper and lower case for business and 
word processing applications. 
Home Control 

The C8P DF has the most advanced home 
monitoring and control capabilities ever 
offered in a computer system. It incorporates 
a real time clock and a unique FOREGROUND/ 
BACKGROUND operating system which allows 
the computer to function with normal BASIC 
programs at the same time it is monitoring 
external devices. The C8P DF comes standard 
with an AC remote control interface which 
allows it to control a wide range of AC appli- 
ances and lights remotely without wiring and 
an interface for home security systems which 
monitors fire, intrusion, car theft, water levels 
and freezer temperature, all without messy 
wiring. In addition, the C8P DF can accept 
Ohio Scientific's Votrax voice I/O board and/or 
Ohio Scientific's new universal telephone inter- 
face (UTI). The telephone interface connects 
the computer to any touch-tone or rotary dial 
telephone line. The computer system is able to 
answer calls, initiate calls and communicate 
via touch-tone signals, voice output or 300 
baud modem signals. It can accept and 
decode touch-tone signals, 300 baud modem 
signals and record incoming voice messages. 



These features collectively give the C8P DF 
capabilities to monitor and control home func- 
tions with almost human-like capabilities. 
Process Controller 

The C8P DF incorporates a real time clock, 
FOREGROUND/BACKGROUND operation and 
16 parallel I/O lines. Additionally a universal 
accessory BUS connector is accessible at the 
back of the computer to plug in additional 48 
lines of parallel I/O and/or a complete analog 
signal I/O board with A/D and D/A and 
multiplexers. 

Clearly the C8P OF beats all existing small 
computers in conventional specifications plus 
it has capabilities far beyond any other com- 
puter system on the market today 
C8P DF is an 8-slot mainframe class computer 
with 32K static RAM, dual 8" floppies, and 
several open slots for expansion. 

Prices start at under $3,000. 

Computers come with keyboards and floppies where specified. 
Other equipment shown is optional. 

For literature and the name of your local 
dealer, CALL 1-a00-321-6850TOLL FREE. 
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